From 873ab8f27006b17c79e1ef98333c14eb62058c9e Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= Date: Sun, 26 Apr 2020 02:24:06 +0200 Subject: Fix errors in tests. --- tests/rrule-parse.scm | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) (limited to 'tests/rrule-parse.scm') diff --git a/tests/rrule-parse.scm b/tests/rrule-parse.scm index 84e7b6ce..3ecfc693 100644 --- a/tests/rrule-parse.scm +++ b/tests/rrule-parse.scm @@ -1,11 +1,12 @@ (((vcomponent recurrence parse) parse-recurrence-rule) - ((vcomponent recurrence) make-recur-rule)) + ((vcomponent recurrence) make-recur-rule) + ((datetime util) mon)) -(test-equal (make-recur-rule freq: 'HOURLY wkst: 'MO interval: 1) +(test-equal (make-recur-rule freq: 'HOURLY wkst: mon interval: 1) (parse-recurrence-rule "FREQ=HOURLY")) -(test-equal (make-recur-rule freq: 'HOURLY count: 3 interval: 1 wkst: 'MO) +(test-equal (make-recur-rule freq: 'HOURLY count: 3 interval: 1 wkst: mon) (parse-recurrence-rule "FREQ=HOURLY;COUNT=3")) ;;; TODO write tests for these cases -- cgit v1.2.3