blob: 58daaa9b402befd1dd01e2f6250b4016ab1691c5 (
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) 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
|