blob: 303b4547390ccace75466c0b7fdf5f6464031fa2 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
(((vcomponent recurrence parse) parse-recurrence-rule)
((vcomponent recurrence internal)
make-recur-rule weekdays intervals)
((datetime util) mon))
(test-equal
(make-recur-rule freq: 'DAILY wkst: mon interval: 1)
(parse-recurrence-rule "FREQ=DAILY"))
(test-equal
(make-recur-rule freq: 'WEEKLY wkst: mon interval: 1)
(parse-recurrence-rule "FREQ=WEEKLY"))
;; TODO more tests
|
