gnu: hurd-core-headers: Strictly include header packages.

* gnu/packages/hurd.scm (hurd-core-headers)[arguments]: Strictly include
header package inputs in union.
This commit is contained in:
Jan (janneke) Nieuwenhuizen 2020-06-29 07:52:59 +02:00
parent b1c894b53f
commit 26611f56fb
No known key found for this signature in database
GPG key ID: F3C1A0D9C1D65273

View file

@ -264,13 +264,21 @@ (define-public hurd-core-headers
(arguments (arguments
'(#:modules ((guix build union)) '(#:modules ((guix build union))
#:builder (begin #:builder (begin
(use-modules (ice-9 match) (use-modules (srfi srfi-1)
(srfi srfi-26)
(ice-9 match)
(guix build union)) (guix build union))
(match %build-inputs (let ((inputs (filter
(((names . directories) ...) (compose (cute member <> '("gnumach-headers"
(union-build (assoc-ref %outputs "out") "hurd-headers"
directories) "hurd-minimal"))
#t))))) car)
%build-inputs)))
(match inputs
(((names . directories) ...)
(union-build (assoc-ref %outputs "out")
directories)
#t))))))
(inputs `(("gnumach-headers" ,gnumach-headers) (inputs `(("gnumach-headers" ,gnumach-headers)
("hurd-headers" ,hurd-headers) ("hurd-headers" ,hurd-headers)
("hurd-minimal" ,hurd-minimal))) ("hurd-minimal" ,hurd-minimal)))