diff options
| author | Zheng Junjie <zhengjunjie@iscas.ac.cn> | 2023-09-06 17:46:49 +0800 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2023-09-14 17:03:54 +0200 |
| commit | 62e138706507bab7e342c2b75fcaaa92f9440597 (patch) | |
| tree | 8ceb3f0ff67aff26c9d19133c895e2003355e12d /gnu | |
| parent | 40a76a7750586c05b85619a8a6e69610005edbc8 (diff) | |
| download | guix-62e138706507bab7e342c2b75fcaaa92f9440597.tar.gz | |
gnu: npiet: Use gexps.
* gnu/packages/piet.scm (npiet): Use Gexp. [arguments]: Use Gexp and remove tail #t. Signed-off-by: Ludovic Courtès <ludo@gnu.org>
Diffstat (limited to 'gnu')
| -rw-r--r-- | gnu/packages/piet.scm | 22 |
1 files changed, 12 insertions, 10 deletions
diff --git a/gnu/packages/piet.scm b/gnu/packages/piet.scm index 8e5a313e82..0b16299482 100644 --- a/gnu/packages/piet.scm +++ b/gnu/packages/piet.scm @@ -21,6 +21,7 @@ (define-module (gnu packages piet) #:use-module (guix packages) #:use-module (guix download) + #:use-module (guix gexp) #:use-module (guix git-download) #:use-module ((guix licenses) #:prefix license:) #:use-module (guix build-system gnu) @@ -44,16 +45,17 @@ "0nl59fhdqqr7nslxdirdn8nvlq5wws67c7jyx2ckbmxbc9h8bv9d")))) (build-system gnu-build-system) (arguments - `(#:phases - (modify-phases %standard-phases - (add-after 'install 'wrap-binaries - (lambda* (#:key inputs outputs #:allow-other-keys) - (let ((out (assoc-ref outputs "out"))) - (wrap-program (string-append out "/bin/npietedit") - `("PATH" ":" prefix - (,(dirname - (search-input-file inputs "bin/wish"))))) - #t)))))) + (list #:phases + #~(modify-phases %standard-phases + (add-after 'install 'wrap-binaries + (lambda* (#:key inputs outputs #:allow-other-keys) + (let ((out (assoc-ref outputs "out"))) + (wrap-program (string-append out + "/bin/npietedit") + `("PATH" ":" prefix + (,(dirname + (search-input-file + inputs "bin/wish"))))))))))) (inputs (list gd giflib libpng tk)) (native-inputs (list groff)) |