~ruther/guix-local: tests: Fix 'cond-expand' clause for 2.2/2.0.

ed407f3ccc5de3e440884001d05887a07df5fa81 — Ludovic Courtès 9 years ago aeb6fe5

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.

patch browse .tar.gz

1 files changed, 2 insertions(+), 2 deletions(-)

M tests/store.scm

M tests/store.scm => tests/store.scm +2 -2

@@ 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" '()))