~ruther/guix-local: packages: Allow inputs that are local files.

e67ac6e66811c6125d25febe76043fa47037591f — Ludovic Courtès 13 years ago 74cd03b

packages: Allow inputs that are local files.

* guix/packages.scm (package-derivation): Add to the store inputs that
  are local files.

patch browse .tar.gz

1 files changed, 7 insertions(+), 1 deletions(-)

M guix/packages.scm

M guix/packages.scm => guix/packages.scm +7 -1

@@ 179,7 179,13 @@ representation."
                                 sub-drv))
                          (((? string? name)
                            (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
                                            propagated-inputs)))))
        (apply builder