diff options
| author | Hugo Hörnquist <hugo@lysator.liu.se> | 2020-05-24 22:35:42 +0200 |
|---|---|---|
| committer | Hugo Hörnquist <hugo@lysator.liu.se> | 2020-05-24 22:35:42 +0200 |
| commit | 583ce0ec3e183888b24743e817f952194435eb90 (patch) | |
| tree | 23724b750c3aad6c7b641eaab1ad3472ad02ac07 /module | |
| parent | Add stream-partition. (diff) | |
| download | calp-583ce0ec3e183888b24743e817f952194435eb90.tar.gz calp-583ce0ec3e183888b24743e817f952194435eb90.tar.xz | |
Move TODO's about BYSETPOS to GitHub issue.
https://github.com/HugoNikanor/calp/issues/6
Diffstat (limited to 'module')
| -rw-r--r-- | module/vcomponent/recurrence/display/test.scm | 4 | ||||
| -rw-r--r-- | module/vcomponent/recurrence/generate.scm | 2 |
2 files changed, 0 insertions, 6 deletions
diff --git a/module/vcomponent/recurrence/display/test.scm b/module/vcomponent/recurrence/display/test.scm index a0fc676e..e7f8e466 100644 --- a/module/vcomponent/recurrence/display/test.scm +++ b/module/vcomponent/recurrence/display/test.scm @@ -49,8 +49,6 @@ v) -;; TODO bysetpos - (map run-test (list (vevent @@ -253,8 +251,6 @@ forever (U.S. Presidential Election day)" rrule: "FREQ=YEARLY;INTERVAL=4;BYMONTH=11;BYDAY=TU;BYMONTHDAY=2,3,4,5,6,7,8") ;; => "varje tisdag den andre, tredje, fjärde, femte, sjätte, sjunde & åttonde i november vart fjärde år" - ;; TODO bysetpos - (vevent summary: "The third instance into the month of one of Tuesday, Wednesday, or Thursday, for the next 3 months" diff --git a/module/vcomponent/recurrence/generate.scm b/module/vcomponent/recurrence/generate.scm index 7f681aa7..91cd5ee2 100644 --- a/module/vcomponent/recurrence/generate.scm +++ b/module/vcomponent/recurrence/generate.scm @@ -292,7 +292,6 @@ [(BYHOUR) (memv (hour t) values)] [(BYMINUTE) (memv (minute t) values)] [(BYSECOND) (memv (second t) values)] - ;; TODO ;; [(BYSETPOS)] [else (error "Unknown by-limiter")]) @@ -300,7 +299,6 @@ (define-stream (limit-recurrence-set rrule date-stream) - ;; TODO BYSETPOS (stream-filter ;; filter inlavid datetimes (feb 30, times droped due to zone-shift, ...) (lambda (dt) |