diff options
author | Ludovic Courtès <ludo@gnu.org> | 2013-11-12 23:44:47 +0100 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2013-11-13 00:29:05 +0100 |
commit | f80594cc41d7ad491f14a73d594228bacafdc871 (patch) | |
tree | 21405e6294986e2258fe6cde2822915dfdee0a2f /guix/packages.scm | |
parent | 9336e5b5e7b05e636b147aba2c97357620711c2a (diff) | |
download | gnu-guix-f80594cc41d7ad491f14a73d594228bacafdc871.tar gnu-guix-f80594cc41d7ad491f14a73d594228bacafdc871.tar.gz |
packages: Suitably cope with indirect store paths as package sources.
* guix/packages.scm (package-source-derivation): Don't let indirect
store paths pass through.
* tests/packages.scm ("package-source-derivation, indirect store path"):
New test.
Diffstat (limited to 'guix/packages.scm')
-rw-r--r-- | guix/packages.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/guix/packages.scm b/guix/packages.scm index d4a295e3ac..b25cc52bba 100644 --- a/guix/packages.scm +++ b/guix/packages.scm @@ -413,7 +413,7 @@ IMPORTED-MODULES specify modules to use/import for use by SNIPPET." #:guile-for-build (or guile-for-build (%guile-for-build) (default-guile store system))))) - ((and (? string?) (? store-path?) file) + ((and (? string?) (? direct-store-path?) file) file) ((? string? file) (add-to-store store (basename file) #t "sha256" file)))) |