From ee12b9a00e86b0af168d82c436afd8683dc6649b Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= Date: Mon, 13 Jun 2022 04:11:15 +0200 Subject: Cleanup of zic. --- tests/test/zic.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'tests/test') diff --git a/tests/test/zic.scm b/tests/test/zic.scm index 2a4e30ce..99247cf1 100644 --- a/tests/test/zic.scm +++ b/tests/test/zic.scm @@ -294,8 +294,8 @@ Zone America/Menominee -5:00 - EST 1973 Apr 29 2:00 ""))) (test-equal "Crash on counting backwards from date" - '(warning "Counting backward for RRULES unsupported" ()) - (catch 'warning + '(misc-error "rule->rrule" "Counting backward for RRULES unsupported" #f #f) + (catch 'misc-error (lambda () (rule->rrule ((@@ (datetime zic) make-rule) 'EU 1996 'maximum 10 `(< ,mon 2) -- cgit v1.2.3