blob: d1113477025e2dad584897b49d5455365cd9217b (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
|
(define-module (vcomponent recurrence)
#:use-module (vcomponent)
#:use-module (vcomponent 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)))
|
