diff options
Diffstat (limited to 'gnu/packages/linux.scm')
| -rw-r--r-- | gnu/packages/linux.scm | 13 |
1 files changed, 12 insertions, 1 deletions
diff --git a/gnu/packages/linux.scm b/gnu/packages/linux.scm index 99adda92c9..fc95a0b896 100644 --- a/gnu/packages/linux.scm +++ b/gnu/packages/linux.scm @@ -446,7 +446,11 @@ providing the system administrator with some help in common tasks.") (build-system gnu-build-system) (inputs `(("ncurses" ,ncurses))) (arguments - '(#:phases (alist-replace + '(#:modules ((guix build utils) + (guix build gnu-build-system) + (srfi srfi-1) + (srfi srfi-26)) + #:phases (alist-replace 'configure (lambda* (#:key outputs #:allow-other-keys) ;; No `configure', just a single Makefile. @@ -468,6 +472,13 @@ providing the system administrator with some help in common tasks.") (system* "make" "install" (string-append "DESTDIR=" out))) + ;; Remove commands and man pages redundant with + ;; Coreutils. + (let ((dup (append-map (cut find-files out <>) + '("^kill" "^uptime")))) + (for-each delete-file dup) + #t) + ;; Sanity check. (zero? (system* (string-append out "/bin/ps") |