me
/
guix
Archived
1
0
Fork 0
Code

gnu: zerofree: Use ‘install-file’. 

* gnu/packages/linux.scm (zerofree)[arguments]: Simplify install phase,
using ‘install-file’.
master
Tobias Geerinckx-Rice 2017-08-03 22:22:43 +02:00
parent 0f08917df3
commit 7a068459ba
No known key found for this signature in database
GPG Key ID: 0DB0FF884F556D79
1 changed files with 2 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
gnu/packages/linux.scm
View File

@ -841,11 +841,8 @@ ext3 or ext4 partition.")
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
(let* ((out (assoc-ref outputs "out")) (let* ((out (assoc-ref outputs "out"))
(bin (string-append out "/bin"))) (bin (string-append out "/bin")))
(mkdir-p bin) (chmod "zerofree" #o555)
(copy-file "zerofree" (install-file "zerofree" bin)
(string-append bin "/zerofree"))
(chmod (string-append bin "/zerofree")
#o555)
#t)))) #t))))
#:tests? #f)) ; no tests #:tests? #f)) ; no tests
(inputs `(("libext2fs" ,e2fsprogs))) (inputs `(("libext2fs" ,e2fsprogs)))