diff options
author | Ludovic Courtès <ludo@gnu.org> | 2016-07-12 18:00:16 +0200 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2016-07-12 22:47:08 +0200 |
commit | 66a35ceb43f53c3f3e363714c9a6a402f243670d (patch) | |
tree | 965ba0e0c297f124aad06d66af92102f3270c7cc /tests/grafts.scm | |
parent | 9c14a487bb3813ec5a555536b6bd1c4160ebb042 (diff) | |
download | patches-66a35ceb43f53c3f3e363714c9a6a402f243670d.tar patches-66a35ceb43f53c3f3e363714c9a6a402f243670d.tar.gz |
gexp: Remove more uses of #:modules.
* guix/scripts/system.scm (switch-to-system): Adjust comment.
* tests/gexp.scm ("gexp->derivation #:references-graphs"): Use
'with-imported-modules' instead of #:modules.
* tests/grafts.scm ("graft-derivation, preserve empty directories"):
Likewise.
Diffstat (limited to 'tests/grafts.scm')
-rw-r--r-- | tests/grafts.scm | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/tests/grafts.scm b/tests/grafts.scm index 8cd048552c..13c56750ed 100644 --- a/tests/grafts.scm +++ b/tests/grafts.scm @@ -135,14 +135,14 @@ (replacement fake))) (drv (gexp->derivation "to-graft" - #~(begin - (use-modules (guix build utils)) - (mkdir-p (string-append #$output - "/a/b/c/d")) - (symlink #$%bash - (string-append #$output - "/bash"))) - #:modules '((guix build utils)))) + (with-imported-modules '((guix build utils)) + #~(begin + (use-modules (guix build utils)) + (mkdir-p (string-append #$output + "/a/b/c/d")) + (symlink #$%bash + (string-append #$output + "/bash")))))) (grafted ((store-lift graft-derivation) drv (list graft))) (_ (built-derivations (list grafted))) |