ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2024-11-07 15:36:20 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: lsof: Shorten 'install phase.

Browse source 
* gnu/packages/lsof.scm (lsof)[arguments]: Use 'install-file during the
'install phase.
This commit is contained in:
Efraim Flashner 2017-04-29 23:39:53 +03:00
parent b6ea329a32
commit 4ae3549f7c
No known key found for this signature in database
GPG key ID: F4C1D3917EACEE93
1 changed files with 3 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
gnu/packages/lsof.scm
View file

@ -72,13 +72,9 @@ (define-public lsof
(replace 'install (replace 'install
(lambda* (#:key outputs #:allow-other-keys) (lambda* (#:key outputs #:allow-other-keys)
(let ((out (assoc-ref outputs "out"))) (let ((out (assoc-ref outputs "out")))
(mkdir out) (install-file "lsof" (string-append out "/bin"))
(mkdir (string-append out "/bin")) (install-file "lsof.8" (string-append out "/share/man/man8")))
(copy-file "lsof" (string-append out "/bin/lsof")) #t)))))
(mkdir (string-append out "/share"))
(mkdir (string-append out "/share/man"))
(mkdir (string-append out "/share/man/man8"))
(copy-file "lsof.8" (string-append out "/share/man/man8/lsof.8"))))))))
(synopsis "Display information about open files") (synopsis "Display information about open files")
(description (description
"Lsof stands for LiSt Open Files, and it does just that. "Lsof stands for LiSt Open Files, and it does just that.