summaryrefslogtreecommitdiff
path: root/guix/scripts/build.scm
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2016-12-21 23:46:44 +0100
committerLudovic Courtès <ludo@gnu.org>2016-12-21 23:48:14 +0100
commit7c247809efe5d6a2a11617f41f45a2b6e8d6855f (patch)
treecd00d39ef9ee9c9bf95f80583e76e0fd431d3969 /guix/scripts/build.scm
parent590b80d29a359d6dbaa3e1f5861e38572e077317 (diff)
downloadguix-patches-7c247809efe5d6a2a11617f41f45a2b6e8d6855f.tar
guix-patches-7c247809efe5d6a2a11617f41f45a2b6e8d6855f.tar.gz
guix build: '--with-source' overrides the 'replacement' of a package.
* guix/scripts/build.scm (package-with-source): Set 'replacement' to #f. * tests/scripts-build.scm ("options->transformation, with-source, replacement"): New test.
Diffstat (limited to 'guix/scripts/build.scm')
-rw-r--r--guix/scripts/build.scm6
1 files changed, 5 insertions, 1 deletions
diff --git a/guix/scripts/build.scm b/guix/scripts/build.scm
index 8c2c4902fc..ccb4c275fc 100644
--- a/guix/scripts/build.scm
+++ b/guix/scripts/build.scm
@@ -151,7 +151,11 @@ the new package's version number from URI."
;; Use #:recursive? #t to allow for directories.
(source (download-to-store store uri
- #:recursive? #t))))))
+ #:recursive? #t))
+
+ ;; Override the replacement, otherwise '--with-source' would
+ ;; have no effect.
+ (replacement #f)))))
;;;