summaryrefslogtreecommitdiff
path: root/gnu/packages/text-editors.scm
diff options
context:
space:
mode:
authorMarius Bakke <marius@gnu.org>2021-07-31 13:33:54 +0200
committerMarius Bakke <marius@gnu.org>2021-08-01 23:24:47 +0200
commit1f82eeec8d2190a85cee1ab630470a01bb3e968c (patch)
tree9275eca42e2f89b3b98954d6dd535fe0bc85e454 /gnu/packages/text-editors.scm
parent317313a1780e93266e88cf141690d8a5426185b5 (diff)
gnu: mg: Update style.
* gnu/packages/text-editors.scm (mg)[native-inputs, inputs]: Remove labels. [arguments]: Use SEARCH-INPUT-FILE and #$OUTPUT in phases.
Diffstat (limited to 'gnu/packages/text-editors.scm')
-rw-r--r--gnu/packages/text-editors.scm20
1 files changed, 7 insertions, 13 deletions
diff --git a/gnu/packages/text-editors.scm b/gnu/packages/text-editors.scm
index 148c97dd01..fe70dbd75e 100644
--- a/gnu/packages/text-editors.scm
+++ b/gnu/packages/text-editors.scm
@@ -522,12 +522,8 @@ 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.
(list #:tests? #f
@@ -542,16 +538,14 @@ Wordstar-, EMACS-, Pico, Nedit or vi-like key bindings. e3 can be used on
(lambda* (#:key inputs #:allow-other-keys)
(substitute* "buffer.c"
(("/usr/bin/diff")
- (string-append (assoc-ref inputs "diffutils")
- "/bin/diff")))))
+ (search-input-file inputs "/bin/diff")))))
(add-before 'install 'patch-tutorial-location
- (lambda* (#:key outputs #:allow-other-keys)
+ (lambda _
(substitute* "mg.1"
- (("/usr") (assoc-ref outputs "out")))))
+ (("/usr") #$output))))
(add-after 'install 'install-tutorial
- (lambda* (#:key outputs #:allow-other-keys)
- (let* ((out (assoc-ref outputs "out"))
- (doc (string-append out "/share/doc/mg")))
+ (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")