guix/guix
3
5
Fork 0
mirror of git://git.savannah.gnu.org/guix.git synced 2023-12-14 03:33:07 +01:00
Code Issues Releases Wiki Activity

gnu: zerofree: Use ‘install-file’.

Browse source 
* gnu/packages/linux.scm (zerofree)[arguments]: Simplify install phase,
using ‘install-file’.
This commit is contained in:
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)
(let* ((out (assoc-ref outputs "out"))
(bin (string-append out "/bin")))
(mkdir-p bin)
(copy-file "zerofree"
(string-append bin "/zerofree"))
(chmod (string-append bin "/zerofree")
#o555)
(chmod "zerofree" #o555)
(install-file "zerofree" bin)
#t))))
#:tests? #f)) ; no tests
(inputs `(("libext2fs" ,e2fsprogs)))