From e67ac6e66811c6125d25febe76043fa47037591f Mon Sep 17 00:00:00 2001
From: Ludovic Courtès <ludo@gnu.org>
Date: Sun, 1 Jul 2012 17:32:03 +0200
Subject: packages: Allow inputs that are local files.

* guix/packages.scm (package-derivation): Add to the store inputs that
  are local files.
---
 guix/packages.scm | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

(limited to 'guix/packages.scm')

diff --git a/guix/packages.scm b/guix/packages.scm
index c3a17640eb..2d269ad339 100644
--- a/guix/packages.scm
+++ b/guix/packages.scm
@@ -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
-- 
cgit v1.2.3