diff options
author | Ludovic Courtès <ludo@gnu.org> | 2015-02-02 11:24:24 +0100 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2015-02-02 12:46:35 +0100 |
commit | e6c8839c180b88a9ef9e68af8acc3148099e286b (patch) | |
tree | e2bba56486a3eb8954f3af88618c75a68ab1e3f7 /.dir-locals.el | |
parent | 6eebbab5624f213a298afb1baed28cec026b2727 (diff) | |
download | patches-e6c8839c180b88a9ef9e68af8acc3148099e286b.tar patches-e6c8839c180b88a9ef9e68af8acc3148099e286b.tar.gz |
tests: Add 'with-derivation-substitute' and use it.
* guix/tests.scm (%substitute-directory): New variable.
(call-with-derivation-narinfo): Use it.
(call-with-derivation-substitute): New procedure.
(with-derivation-substitute): New macro.
* tests/store.scm ("substitute"): Use 'with-derivation-substitute'.
("substitute, corrupt output hash"): Likewise.
Diffstat (limited to '.dir-locals.el')
-rw-r--r-- | .dir-locals.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/.dir-locals.el b/.dir-locals.el index 91d57b9eb2..3c989d1338 100644 --- a/.dir-locals.el +++ b/.dir-locals.el @@ -43,7 +43,7 @@ (eval . (put 'emacs-substitute-sexps 'scheme-indent-function 1)) (eval . (put 'emacs-substitute-variables 'scheme-indent-function 1)) (eval . (put 'with-derivation-narinfo 'scheme-indent-function 1)) - + (eval . (put 'with-derivation-substitute 'scheme-indent-function 1)) (eval . (put 'syntax-parameterize 'scheme-indent-function 1)) (eval . (put 'with-monad 'scheme-indent-function 1)) |