gnu: procps: Remove the 'kill' and 'uptime' commands.
* gnu/packages/linux.scm (procps)[arguments]: Add #:modules. <install phase>: Remove kill* and uptime*.
This commit is contained in:
parent
aa72d9afdf
commit
80393eeda2
|
@ -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")
|
||||
|
|
Loading…
Reference in New Issue