gnu: zerofree: Use ‘install-file’.
* gnu/packages/linux.scm (zerofree)[arguments]: Simplify install phase, using ‘install-file’.
This commit is contained in:
parent
0f08917df3
commit
7a068459ba
|
@ -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)))
|
||||||
|
|
Loading…
Reference in New Issue