diff options
author | Efraim Flashner <efraim@flashner.co.il> | 2022-01-12 12:42:12 +0200 |
---|---|---|
committer | Efraim Flashner <efraim@flashner.co.il> | 2022-01-12 12:42:12 +0200 |
commit | 2d3bec89b5f7d4dcdfc78a404a06d27639eec83d (patch) | |
tree | a5511d88d1c56c16cfede4874c3e39ea1f7f7969 /gnu/packages/admin.scm | |
parent | e773326cc23468bf842c7e9843ebd1660fb0f9dd (diff) | |
download | guix-2d3bec89b5f7d4dcdfc78a404a06d27639eec83d.tar.gz guix-2d3bec89b5f7d4dcdfc78a404a06d27639eec83d.zip |
gnu: tree: Rewrite with gexps.
* gnu/packages/admin.scm (tree)[arguments]: Rewrite with gexps.
Diffstat (limited to 'gnu/packages/admin.scm')
-rw-r--r-- | gnu/packages/admin.scm | 13 |
1 files changed, 8 insertions, 5 deletions
diff --git a/gnu/packages/admin.scm b/gnu/packages/admin.scm index 6289b89e9a..f11374a439 100644 --- a/gnu/packages/admin.scm +++ b/gnu/packages/admin.scm @@ -2405,11 +2405,14 @@ recover lost partitions and/or make non-booting disks bootable again.") (base32 "0f92vx6gpz7v29wi9clklzah57v7lgx5kv0m1w4b9xjc35d9qcz3")))) (build-system gnu-build-system) (arguments - `(#:phases (modify-phases %standard-phases (delete 'configure)) - #:tests? #f ; no check target - #:make-flags (let ((out (assoc-ref %outputs "out"))) - (list (string-append "PREFIX=" out) - (string-append "CC=" ,(cc-for-target)))))) + (list + #:phases + #~(modify-phases %standard-phases + (delete 'configure)) ; No configure script. + #:tests? #f ; No check target. + #:make-flags + #~(list (string-append "PREFIX=" #$output) + (string-append "CC=" #$(cc-for-target))))) (synopsis "Recursively list the contents of a directory") (description "Tree is a recursive directory listing command that produces a depth |