diff options
| author | Hugo Hörnquist <hugo@lysator.liu.se> | 2020-04-17 22:07:28 +0200 |
|---|---|---|
| committer | Hugo Hörnquist <hugo@lysator.liu.se> | 2020-04-17 22:07:28 +0200 |
| commit | ad4adc7576c5c2e2c0cae010a6b0a14601a849ab (patch) | |
| tree | 7f593bc1a5eca02f2b6e2f02676c9c380d68bbd2 /module/vcomponent/recurrence/internal.scm | |
| parent | Add week numbers to HTML small calendar. (diff) | |
| download | calp-ad4adc7576c5c2e2c0cae010a6b0a14601a849ab.tar.gz calp-ad4adc7576c5c2e2c0cae010a6b0a14601a849ab.tar.xz | |
RRULE parser now converts weekdays to (datetime util) weekdays.
Diffstat (limited to 'module/vcomponent/recurrence/internal.scm')
| -rw-r--r-- | module/vcomponent/recurrence/internal.scm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/module/vcomponent/recurrence/internal.scm b/module/vcomponent/recurrence/internal.scm index f7b49abc..cb00cd3d 100644 --- a/module/vcomponent/recurrence/internal.scm +++ b/module/vcomponent/recurrence/internal.scm @@ -3,6 +3,7 @@ #:use-module (srfi srfi-88) ; better keywords #:use-module ((vcomponent base) :select (attr)) + #:use-module (datetime util) #:use-module (util) ) @@ -55,7 +56,7 @@ val ...)))) (define-public weekdays - '(SU MO TU WE TH FR SA)) + (weekday-list sun)) (define-public intervals '(SECONDLY MINUTELY HOURLY DAILY WEEKLY MONTHLY YEARLY)) |