aboutsummaryrefslogtreecommitdiff
path: root/tests/store.scm
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2017-03-22 14:40:51 +0100
committerLudovic Courtès <ludo@gnu.org>2017-03-22 15:02:33 +0100
commited407f3ccc5de3e440884001d05887a07df5fa81 (patch)
tree74d11f25ed1a62e30b493eac256fc2ea21488f8d /tests/store.scm
parentaeb6fe5fa0891c1b825a8f403dd1c42bbfd6e952 (diff)
downloadpatches-ed407f3ccc5de3e440884001d05887a07df5fa81.tar
patches-ed407f3ccc5de3e440884001d05887a07df5fa81.tar.gz
tests: Fix 'cond-expand' clause for 2.2/2.0.
Fixes a mistake in a9a0227c0127e1813190a7664f7ad858e791480d. * tests/store.scm ("current-build-output-port, UTF-8 + garbage"): Inverse the 'cond-expand' clauses since the 'guile-2.0' feature doesn't exist.
Diffstat (limited to 'tests/store.scm')
-rw-r--r--tests/store.scm4
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/store.scm b/tests/store.scm
index c0ebe7b941..45150d36ca 100644
--- a/tests/store.scm
+++ b/tests/store.scm
@@ -384,8 +384,8 @@
(guard (c ((nix-protocol-error? c) #t))
(build-derivations %store (list d))))))))
(cond-expand
- (guile-2.0 "garbage: ?lambda: λ")
- (else "garbage: �lambda: λ"))))
+ (guile-2.2 "garbage: �lambda: λ")
+ (else "garbage: ?lambda: λ"))))
(test-assert "log-file, derivation"
(let* ((b (add-text-to-store %store "build" "echo $foo > $out" '()))