From 488a4521b5e7eaccccd807502a99776ad49fd2ff Mon Sep 17 00:00:00 2001 From: =?utf8?q?Ludovic=20Court=C3=A8s?= Date: Tue, 16 Oct 2007 16:00:39 +0200 Subject: [PATCH] Tiny test-suite fix. * tests/run-test.scm: Don't use `option-ref'. --- tests/run-test.scm | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) diff --git a/tests/run-test.scm b/tests/run-test.scm index d34ba29..10314be 100644 --- a/tests/run-test.scm +++ b/tests/run-test.scm @@ -33,9 +33,7 @@ (register-reporter (lambda results (case (car results) ((unresolved) - (and (option-ref options - 'flag-unresolved #f) - (set! global-pass #f))) + #f) ((fail upass error) (set! global-pass #f))))) -- 2.11.4.GIT