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 @@ recursively."
(list name (list name
(add-to-store store (basename file) (add-to-store store (basename file)
#t #f "sha256" file))) #t #f "sha256" file)))
(((? string? name) (? origin? source))
(list name
(package-source-derivation store source)))
(x (x
(raise (condition (&package-input-error (raise (condition (&package-input-error
(package package) (package package)