blob: 3657cae667eb06a063af7e176746cb58010afde9 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
|
(define-module (vcalendar recur)
#:use-module (vcalendar)
#:use-module (vcalendar recurrence generate)
#:re-export (generate-recurrence-set)
#:export (repeating?))
;; EXDATE is also a property linked to recurense rules
;; but that property alone don't create a recuring event.
(define (repeating? ev)
"Does this event repeat?"
(or (attr ev 'RRULE)
(attr ev 'RDATE)))
|