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