Browse Source

build-system/gnu: Relax location handling in `package-with-explicit-inputs'.

* guix/build-system/gnu.scm (package-with-explicit-inputs): Convert LOC
  when it is a source-property list.
wip-grafts
Ludovic Courtès 10 years ago
parent
commit
1f34bda1e2
  1. 5
      guix/build-system/gnu.scm

5
guix/build-system/gnu.scm

@ -38,8 +38,7 @@
(define* (package-with-explicit-inputs p boot-inputs
#:optional
(loc (source-properties->location
(current-source-location))))
(loc (current-source-location)))
"Rewrite P, which is assumed to use GNU-BUILD-SYSTEM, to take BOOT-INPUTS
as explicit inputs instead of the implicit default, and return it."
(define rewritten-input
@ -55,7 +54,7 @@ as explicit inputs instead of the implicit default, and return it."
(fold alist-delete inputs boot-input-names))
(package (inherit p)
(location loc)
(location (if (pair? loc) (source-properties->location loc) loc))
(arguments
(let ((args (package-arguments p)))
(if (procedure? args)

Loading…
Cancel
Save