packages: Allow inputs that are local files.

* guix/packages.scm (package-derivation): Add to the store inputs that
  are local files.
This commit is contained in:
Ludovic Courtès 2012-07-01 17:32:03 +02:00
parent 74cd03b1a0
commit e67ac6e668

View file

@ -179,7 +179,13 @@ (define* (package-derivation store package
sub-drv)) sub-drv))
(((? string? name) (((? string? name)
(and (? string?) (? derivation-path?) drv)) (and (? string?) (? derivation-path?) drv))
(list name drv))) (list name drv))
(((? string? name)
(and (? string?) (? (negate store-path?))
(? file-exists? file)))
(list name
(add-to-store store (basename file)
#t #f "sha256" file))))
(concatenate (list native-inputs inputs (concatenate (list native-inputs inputs
propagated-inputs))))) propagated-inputs)))))
(apply builder (apply builder