aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2016-06-16 14:31:52 +0200
committerLudovic Courtès <ludo@gnu.org>2016-06-16 14:31:52 +0200
commita7db719f3dc16b6be7aaab45e718798902d82833 (patch)
treea74f4406c4e502b79f7bfd42ff073c80ea08189d
parent3d1240aa2561792895795315c7783a28bf4412af (diff)
downloadpatches-a7db719f3dc16b6be7aaab45e718798902d82833.tar
patches-a7db719f3dc16b6be7aaab45e718798902d82833.tar.gz
packages: Disambiguate 'modules' and 'imported-modules' in <origin>.
The two mistakes made here (confusion between 'modules' and 'imported-modules') were canceling each other. * guix/packages.scm (patch-and-repack): Use IMPORTED-MODULES, not MODULES, as the base of the module list passed as #:modules to 'gexp->derivation'. (origin->derivation): Pass IMPORTED-MODULES, not MODULES, as the #:imported-modules argument of 'patch-and-repack'. * gnu/packages/engineering.scm (fastcap)[source]: Add 'imported-modules' field.
-rw-r--r--gnu/packages/engineering.scm1
-rw-r--r--guix/packages.scm5
2 files changed, 4 insertions, 2 deletions
diff --git a/gnu/packages/engineering.scm b/gnu/packages/engineering.scm
index 02b1c4e9eb..7b21c11ad3 100644
--- a/gnu/packages/engineering.scm
+++ b/gnu/packages/engineering.scm
@@ -232,6 +232,7 @@ optimizer; and it can produce photorealistic and design review images.")
(modules '((guix build utils)
(guix build download)
(guix ftp-client)))
+ (imported-modules modules)
(patches (search-patches "fastcap-mulSetup.patch"
"fastcap-mulGlobal.patch"))))
(build-system gnu-build-system)
diff --git a/guix/packages.scm b/guix/packages.scm
index 05a632cf05..acb8f34417 100644
--- a/guix/packages.scm
+++ b/guix/packages.scm
@@ -544,7 +544,8 @@ IMPORTED-MODULES specify modules to use/import for use by SNIPPET."
"--files-from=.file_list")))))))))
(let ((name (tarxz-name original-file-name))
- (modules (delete-duplicates (cons '(guix build utils) modules))))
+ (modules (delete-duplicates (cons '(guix build utils)
+ imported-modules))))
(gexp->derivation name build
#:graft? #f
#:system system
@@ -1152,7 +1153,7 @@ cross-compilation target triplet."
#:flags flags
#:system system
#:modules modules
- #:imported-modules modules
+ #:imported-modules imported-modules
#:guile-for-build guile)))))
(define-gexp-compiler (origin-compiler (origin origin?) system target)