packages: Allow store paths as inputs.

* guix/packages.scm (package-derivation): Allow non-derivation store
  paths as inputs.
This commit is contained in:
Ludovic Courtès 2012-08-16 18:48:03 +02:00
parent 10d8289861
commit cf56996046

View file

@ -200,7 +200,9 @@ (define* (package-derivation store package
(list name (package-derivation store package)
sub-drv))
(((? string? name)
(and (? string?) (? derivation-path?) drv))
(and (? string?) (? store-path?) drv))
;; Both derivation and output paths. The latter
;; can be files already in the store.
(list name drv))
(((? string? name)
(and (? string?) (? (negate store-path?))