diff options
Diffstat (limited to '')
-rw-r--r-- | tests/unit/vcomponent/recurrence-simple.scm (renamed from tests/test/recurrence-simple.scm) | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/tests/test/recurrence-simple.scm b/tests/unit/vcomponent/recurrence-simple.scm index b0c3bdea..31a74989 100644 --- a/tests/test/recurrence-simple.scm +++ b/tests/unit/vcomponent/recurrence-simple.scm @@ -90,6 +90,8 @@ END:VEVENT" (stream->list (stream-take 5 (day-stream (prop ev 'DTSTART))))) +(test-assert "Test 1" #t) + (define ev (car (call-with-input-string @@ -99,6 +101,8 @@ RRULE:FREQ=DAILY END:VEVENT" parse-calendar))) +(test-assert "Test 2" #t) + (test-assert "daily 10:00" (stream-car (generate-recurrence-set ev))) @@ -311,3 +315,10 @@ END:VCALENDAR" ;; RRULE:FREQ=DAILY;BYDAY=MO,TU,WE,TH,FR
;; END:VEVENT
;; END:VCALENDAR
+ +;; TODO add remaining rules + + +'((vcomponent recurrence) + (vcomponent formats ical parse) + (vcomponent formats xcal parse)) |