diff options
author | Tobias Geerinckx-Rice <me@tobias.gr> | 2023-07-02 02:00:03 +0200 |
---|---|---|
committer | Tobias Geerinckx-Rice <me@tobias.gr> | 2023-07-02 02:00:06 +0200 |
commit | adf097908c204ded0c7847f1061c486b92d7d0e1 (patch) | |
tree | d52bf1aaba8a2d449bbd448b906bfcbf67914a1a | |
parent | c39abdedbbce8c26b81951bfc04c589ed5dc01ed (diff) | |
download | guix-adf097908c204ded0c7847f1061c486b92d7d0e1.tar.gz guix-adf097908c204ded0c7847f1061c486b92d7d0e1.zip |
gnu: di: Use G-expressions.
* gnu/packages/admin.scm (di)[arguments]: Rewrite as G-expressions.
Rename 'setup-environment phase to 'override-environment.
-rw-r--r-- | gnu/packages/admin.scm | 20 |
1 files changed, 11 insertions, 9 deletions
diff --git a/gnu/packages/admin.scm b/gnu/packages/admin.scm index 7eb04a058f..ff3eee5127 100644 --- a/gnu/packages/admin.scm +++ b/gnu/packages/admin.scm @@ -3553,15 +3553,17 @@ a new command using the matched rule, and runs it.") (base32 "07vsnn1gxm3r7dchbrq63iazd64gza2ac7b2m1039708rf5flxdp")))) (build-system gnu-build-system) (arguments - `(#:tests? #f ; obscure test failures - #:phases - (modify-phases %standard-phases - (delete 'configure) ; no configure script - (add-before 'build 'setup-environment - (lambda* (#:key outputs #:allow-other-keys) - (setenv "CC" ,(cc-for-target)) - (setenv "prefix" (assoc-ref outputs "out"))))) - #:make-flags (list "--environment-overrides"))) + (list + #:tests? #f ; obscure test failures + #:phases + #~(modify-phases %standard-phases + (delete 'configure) ; no configure script + (add-before 'build 'override-environment + (lambda _ + (setenv "CC" #$(cc-for-target)) + (setenv "prefix" #$output)))) + #:make-flags + #~(list "--environment-overrides"))) (home-page "https://gentoo.com/di/") (synopsis "Advanced df like disk information utility") (description |