blob: 0edfc0a1c5460ec2be49e5f19af3882b153ec4f9 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
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
|