diff options
Diffstat (limited to '')
-rw-r--r-- | tests/recurrence-rule.scm | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/tests/recurrence-rule.scm b/tests/recurrence-rule.scm new file mode 100644 index 00000000..0edfc0a1 --- /dev/null +++ b/tests/recurrence-rule.scm @@ -0,0 +1,14 @@ +(((vcomponent recurrence parse) parse-recurrence-rule) + ((vcomponent recurrence internal) + make-recur-rule weekdays intervals)) + + +(test-equal + (make-recur-rule (freq 'DAILY) (wkst 'MO) (interval 1)) + (parse-recurrence-rule "FREQ=DAILY")) + +(test-equal + (make-recur-rule (freq 'WEEKLY) (wkst 'MO) (interval 1)) + (parse-recurrence-rule "FREQ=WEEKLY")) + +;; TODO more tests |