summaryrefslogtreecommitdiff
path: root/gnu/packages/admin.scm
diff options
context:
space:
mode:
authorEfraim Flashner <efraim@flashner.co.il>2022-01-12 12:42:12 +0200
committerEfraim Flashner <efraim@flashner.co.il>2022-01-12 12:42:12 +0200
commit2d3bec89b5f7d4dcdfc78a404a06d27639eec83d (patch)
treea5511d88d1c56c16cfede4874c3e39ea1f7f7969 /gnu/packages/admin.scm
parente773326cc23468bf842c7e9843ebd1660fb0f9dd (diff)
downloadguix-patches-2d3bec89b5f7d4dcdfc78a404a06d27639eec83d.tar
guix-patches-2d3bec89b5f7d4dcdfc78a404a06d27639eec83d.tar.gz
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.scm13
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