[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
03/03: gnu: xxd: Rewrite with gexps.
From: |
guix-commits |
Subject: |
03/03: gnu: xxd: Rewrite with gexps. |
Date: |
Sun, 9 Jan 2022 07:44:20 -0500 (EST) |
efraim pushed a commit to branch master
in repository guix.
commit 796bb42c11b9e8b06933ed6e331b5277bec2cbac
Author: Efraim Flashner <efraim@flashner.co.il>
AuthorDate: Sun Jan 9 11:08:24 2022 +0200
gnu: xxd: Rewrite with gexps.
* gnu/packages/vim.scm (xxd)[arguments]: Rewrite with gexps.
---
gnu/packages/vim.scm | 24 ++++++++++++------------
1 file changed, 12 insertions(+), 12 deletions(-)
diff --git a/gnu/packages/vim.scm b/gnu/packages/vim.scm
index ed2e391c19..aaf3934ff2 100644
--- a/gnu/packages/vim.scm
+++ b/gnu/packages/vim.scm
@@ -31,6 +31,7 @@
(define-module (gnu packages vim)
#:use-module ((guix licenses) #:prefix license:)
#:use-module (guix packages)
+ #:use-module (guix gexp)
#:use-module (guix utils)
#:use-module (guix download)
#:use-module (guix git-download)
@@ -176,20 +177,19 @@ configuration files.")
(package (inherit vim)
(name "xxd")
(arguments
- `(#:make-flags (list ,(string-append "CC=" (cc-for-target)))
+ (list
+ #:make-flags #~(list (string-append "CC=" #$(cc-for-target)))
#:tests? #f ; there are none
#:phases
- (modify-phases %standard-phases
- (delete 'configure)
- (add-after 'unpack 'chdir
- (lambda _
- (chdir "src/xxd")
- #t))
- (replace 'install
- (lambda* (#:key outputs #:allow-other-keys)
- (let ((bin (string-append (assoc-ref outputs "out") "/bin")))
- (install-file "xxd" bin)
- #t))))))
+ #~(modify-phases %standard-phases
+ (delete 'configure)
+ (add-after 'unpack 'chdir
+ (lambda _
+ (chdir "src/xxd")))
+ (replace 'install
+ (lambda* (#:key outputs #:allow-other-keys)
+ (let ((bin (string-append (assoc-ref outputs "out") "/bin")))
+ (install-file "xxd" bin)))))))
(inputs `())
(native-inputs `())
(synopsis "Hexdump utility from vim")