From 4ae3549f7cd57ecd09ebd957ec512dd530dc83d0 Mon Sep 17 00:00:00 2001 From: Efraim Flashner Date: Sat, 29 Apr 2017 23:39:53 +0300 Subject: gnu: lsof: Shorten 'install phase. * gnu/packages/lsof.scm (lsof)[arguments]: Use 'install-file during the 'install phase. --- gnu/packages/lsof.scm | 10 +++------- 1 file changed, 3 insertions(+), 7 deletions(-) (limited to 'gnu/packages/lsof.scm') diff --git a/gnu/packages/lsof.scm b/gnu/packages/lsof.scm index 97658c856a..5442936a49 100644 --- a/gnu/packages/lsof.scm +++ b/gnu/packages/lsof.scm @@ -72,13 +72,9 @@ (replace 'install (lambda* (#:key outputs #:allow-other-keys) (let ((out (assoc-ref outputs "out"))) - (mkdir out) - (mkdir (string-append out "/bin")) - (copy-file "lsof" (string-append out "/bin/lsof")) - (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")))))))) + (install-file "lsof" (string-append out "/bin")) + (install-file "lsof.8" (string-append out "/share/man/man8"))) + #t))))) (synopsis "Display information about open files") (description "Lsof stands for LiSt Open Files, and it does just that. -- cgit v1.2.3