diff options
author | Efraim Flashner <efraim@flashner.co.il> | 2023-05-28 14:45:12 +0300 |
---|---|---|
committer | Efraim Flashner <efraim@flashner.co.il> | 2023-05-28 14:46:09 +0300 |
commit | 9845e408e533f5834a13f294ca1ddc1dc7e248fd (patch) | |
tree | 1d6961c6e51aa50e84bbcda18699773b91eaa19f /gnu | |
parent | ef5a05bac8a539268c564f392d85ab707fdb3843 (diff) | |
download | guix-9845e408e533f5834a13f294ca1ddc1dc7e248fd.tar.gz |
gnu: guix: Remove trailing #t from phases.
* gnu/packages/package-management.scm (guix)[arguments]: Remove trailing #t from phases.
Diffstat (limited to 'gnu')
-rw-r--r-- | gnu/packages/package-management.scm | 12 |
1 files changed, 4 insertions, 8 deletions
diff --git a/gnu/packages/package-management.scm b/gnu/packages/package-management.scm index 08b97bec2f..98fb0d87eb 100644 --- a/gnu/packages/package-management.scm +++ b/gnu/packages/package-management.scm @@ -272,8 +272,7 @@ $(prefix)/etc/openrc\n"))) (("\"[^\"]*/bin/gzip") gzip (string-append "\"" gzip "/bin/gzip")) (("\"[^\"]*/bin//xz") - (string-append "\"" xz "/bin/xz"))))) - #t)) + (string-append "\"" xz "/bin/xz"))))))) (add-before 'build 'set-font-path (lambda* (#:key native-inputs inputs #:allow-other-keys) ;; Tell 'dot' where to look for fonts. @@ -320,8 +319,7 @@ $(prefix)/etc/openrc\n"))) (for-each (lambda (input) (intern (assoc-ref inputs input) #t)) '("bootstrap/bash" "bootstrap/mkdir" - "bootstrap/tar" "bootstrap/xz"))) - #t)) + "bootstrap/tar" "bootstrap/xz"))))) (add-after 'unpack 'disable-failing-tests ;; XXX FIXME: These tests fail within the build container. (lambda _ @@ -334,14 +332,12 @@ $(prefix)/etc/openrc\n"))) (when (file-exists? "tests/guix-environment-container.sh") (substitute* "tests/guix-environment-container.sh" (("guix environment --version") - "exit 77\n"))) - #t)) + "exit 77\n"))))) (add-before 'check 'set-SHELL (lambda _ ;; 'guix environment' tests rely on 'SHELL' having a ;; correct value, so set it. - (setenv "SHELL" (which "sh")) - #t)) + (setenv "SHELL" (which "sh")))) (add-after 'install 'wrap-program (lambda* (#:key inputs native-inputs outputs target #:allow-other-keys) |