packages: Accept <origin> as package inputs.

* guix/packages.scm (package-derivation): Accept use of an <origin> as
  an input.
This commit is contained in:
Ludovic Courtès 2012-09-06 00:00:00 +02:00
parent 1f34bda1e2
commit dc1045be7d

View file

@ -245,6 +245,9 @@ (define* (package-derivation store package
(list name
(add-to-store store (basename file)
#t #f "sha256" file)))
(((? string? name) (? origin? source))
(list name
(package-source-derivation store source)))
(x
(raise (condition (&package-input-error
(package package)