ryan77627/guix
1
0
Fork 0
mirror of https://git.in.rschanz.org/ryan77627/guix.git synced 2025-01-04 18:38:57 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: inetutils: Do not refer to canonical coreutils.

Browse source 
Make sure not to retain a reference to the canonical coreutils package.  The
Guix System closure size would otherwise be increased by including references
to both canonical and non-canonical version of those packages.

* gnu/packages/admin.scm (inetutils)[inputs]: Add "coreutils",
[arguments]: and point to it with PATHDEF_CP variable.
This commit is contained in:
Mathieu Othacehe 2020-08-27 16:18:31 +02:00
parent 17f168fcad
commit 61560d4bef
No known key found for this signature in database
GPG key ID: 8354763531769CA6
1 changed files with 7 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
gnu/packages/admin.scm
View file

@ -623,10 +623,16 @@ (define-public inetutils
"--disable-uucpd" "--disable-uucpd"
"--disable-whois") "--disable-whois")
'())) '()))
;; Make sure that canonical "coreutils" package is not referred.
#:make-flags
(list (string-append "CPPFLAGS=-DPATHDEF_CP=\\\""
(assoc-ref %build-inputs "coreutils*")
"/bin/cp\\\""))
;; On some systems, 'libls.sh' may fail with an error such as: ;; On some systems, 'libls.sh' may fail with an error such as:
;; "Failed to tell switch -a apart from -A". ;; "Failed to tell switch -a apart from -A".
#:parallel-tests? #f)) #:parallel-tests? #f))
(inputs `(("ncurses" ,ncurses) (inputs `(("coreutils*" ,coreutils)
("ncurses" ,ncurses)
("readline" ,readline))) ;for 'ftp' ("readline" ,readline))) ;for 'ftp'
(native-inputs (if (member (%current-system) (native-inputs (if (member (%current-system)
(package-supported-systems net-tools)) (package-supported-systems net-tools))