summaryrefslogtreecommitdiff
path: root/gnu/packages/text-editors.scm
diff options
context:
space:
mode:
Diffstat (limited to 'gnu/packages/text-editors.scm')
-rw-r--r--gnu/packages/text-editors.scm58
1 files changed, 28 insertions, 30 deletions
diff --git a/gnu/packages/text-editors.scm b/gnu/packages/text-editors.scm
index d73f32c64e..18914b342e 100644
--- a/gnu/packages/text-editors.scm
+++ b/gnu/packages/text-editors.scm
@@ -9,7 +9,7 @@
;;; Copyright © 2019 Efraim Flashner <efraim@flashner.co.il>
;;; Copyright © 2019 Andreas Enge <andreas@enge.fr>
;;; Copyright © 2019, 2020, 2021 Nicolas Goaziou <mail@nicolasgoaziou.fr>
-;;; Copyright © 2020 Marius Bakke <mbakke@fastmail.com>
+;;; Copyright © 2020, 2021 Marius Bakke <marius@gnu.org>
;;; Copyright © 2020 Tom Zander <tomz@freedommail.ch>
;;; Copyright © 2020 Mark Meyer <mark@ofosos.org>
;;; Copyright © 2020 Maxime Devos <maximedevos@telenet.be>
@@ -36,6 +36,7 @@
(define-module (gnu packages text-editors)
#:use-module (guix packages)
#:use-module (guix download)
+ #:use-module (guix gexp)
#:use-module (guix git-download)
#:use-module (guix utils)
#:use-module (guix build-system cargo)
@@ -393,7 +394,7 @@ bindings and many of the powerful features of GNU Emacs.")
`(("aspell" ,aspell)
("boost" ,boost)
("ctags" ,universal-ctags)
- ("gtkmm" ,gtkmm)
+ ("gtkmm" ,gtkmm-3)
("gtksourceviewmm" ,gtksourceviewmm)
("libclang" ,clang-11) ;XXX: must be the same version as Mesas LLVM
("libgit2" ,libgit2)))
@@ -521,35 +522,31 @@ Wordstar-, EMACS-, Pico, Nedit or vi-like key bindings. e3 can be used on
(substitute* "GNUmakefile"
(("/usr/bin/") ""))))))
(build-system gnu-build-system)
- (native-inputs
- `(("pkg-config" ,pkg-config)))
- (inputs
- `(("diffutils" ,diffutils)
- ("libbsd" ,libbsd)
- ("ncurses" ,ncurses)))
+ (native-inputs (list pkg-config))
+ (inputs (list diffutils libbsd ncurses))
(arguments
;; No test suite available.
- `(#:tests? #f
- #:make-flags (list (string-append "prefix=" %output)
- (string-append "CC=" ,(cc-for-target))
- (string-append "PKG_CONFIG=" ,(pkg-config-for-target)))
- #:phases (modify-phases %standard-phases
- (delete 'configure) ; no configure script
- (add-before 'build 'correct-location-of-diff
- (lambda* (#:key inputs #:allow-other-keys)
- (substitute* "buffer.c"
- (("/usr/bin/diff")
- (string-append (assoc-ref inputs "diffutils")
- "/bin/diff")))))
- (add-before 'install 'patch-tutorial-location
- (lambda* (#:key outputs #:allow-other-keys)
- (substitute* "mg.1"
- (("/usr") (assoc-ref outputs "out")))))
- (add-after 'install 'install-tutorial
- (lambda* (#:key outputs #:allow-other-keys)
- (let* ((out (assoc-ref outputs "out"))
- (doc (string-append out "/share/doc/mg")))
- (install-file "tutorial" doc)))))))
+ (list #:tests? #f
+ #:make-flags
+ #~(list (string-append "prefix=" #$output)
+ (string-append "CC=" #$(cc-for-target))
+ (string-append "PKG_CONFIG=" #$(pkg-config-for-target)))
+ #:phases
+ #~(modify-phases %standard-phases
+ (delete 'configure) ;no configure script
+ (add-before 'build 'correct-location-of-diff
+ (lambda* (#:key inputs #:allow-other-keys)
+ (substitute* "buffer.c"
+ (("/usr/bin/diff")
+ (search-input-file inputs "/bin/diff")))))
+ (add-before 'install 'patch-tutorial-location
+ (lambda _
+ (substitute* "mg.1"
+ (("/usr") #$output))))
+ (add-after 'install 'install-tutorial
+ (lambda _
+ (let ((doc (string-append #$output "/share/doc/mg")))
+ (install-file "tutorial" doc)))))))
(home-page "https://homepage.boetes.org/software/mg/")
(synopsis "Microscopic GNU Emacs clone")
(description
@@ -765,7 +762,8 @@ environment with Markdown markup.")
(let ((bin (string-append out "/bin"))
(executable (string-append share "/bin/manuskript")))
(wrap-program executable
- (list "PYTHONPATH" 'prefix (list (getenv "PYTHONPATH"))))
+ (list "GUIX_PYTHONPATH" 'prefix
+ (list (getenv "GUIX_PYTHONPATH"))))
(mkdir-p bin)
(with-directory-excursion bin
(symlink (string-append share "/bin/manuskript")