diff options
author | Ludovic Courtès <ludo@gnu.org> | 2017-03-22 14:40:51 +0100 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2017-03-22 15:02:33 +0100 |
commit | ed407f3ccc5de3e440884001d05887a07df5fa81 (patch) | |
tree | 74d11f25ed1a62e30b493eac256fc2ea21488f8d /tests/store.scm | |
parent | aeb6fe5fa0891c1b825a8f403dd1c42bbfd6e952 (diff) | |
download | patches-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.scm | 4 |
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" '())) |