summaryrefslogtreecommitdiff
path: root/test-suite/tests/fluids.test
diff options
context:
space:
mode:
Diffstat (limited to 'test-suite/tests/fluids.test')
-rw-r--r--test-suite/tests/fluids.test2
1 files changed, 1 insertions, 1 deletions
diff --git a/test-suite/tests/fluids.test b/test-suite/tests/fluids.test
index 6eb5095f3..f00fdc480 100644
--- a/test-suite/tests/fluids.test
+++ b/test-suite/tests/fluids.test
@@ -35,7 +35,7 @@
(with-fluids ((c #t))
c))
- (expect-fail "fluids not modified if nonfluid passed to with-fluids"
+ (pass-if "fluids not modified if nonfluid passed to with-fluids"
(catch 'wrong-type-arg
(lambda ()
(with-fluids ((a #t)