aboutsummaryrefslogtreecommitdiff
path: root/module/vcomponent/recurrence/parse.scm
diff options
context:
space:
mode:
Diffstat (limited to 'module/vcomponent/recurrence/parse.scm')
-rw-r--r--module/vcomponent/recurrence/parse.scm7
1 files changed, 3 insertions, 4 deletions
diff --git a/module/vcomponent/recurrence/parse.scm b/module/vcomponent/recurrence/parse.scm
index 680a818e..f532987a 100644
--- a/module/vcomponent/recurrence/parse.scm
+++ b/module/vcomponent/recurrence/parse.scm
@@ -4,10 +4,9 @@
#:export (parse-recurrence-rule)
#:use-module (srfi srfi-1)
- #:use-module (srfi srfi-19) ; Datetime
- #:use-module (srfi srfi-19 util)
+ #:use-module (srfi srfi-19 alt) ; Datetime
+ #:use-module (srfi srfi-19 alt util)
#:use-module (srfi srfi-26)
- #:use-module ((vcomponent datetime) #:select (parse-datetime))
#:use-module (vcomponent recurrence internal)
#:use-module (util)
#:use-module (ice-9 match))
@@ -50,7 +49,7 @@
(let* (((key val) kv))
(let-lazy
((symb (string->symbol val))
- (date (date->time-utc (parse-datetime val)))
+ (date (parse-datetime val))
(days (map parse-day-spec (string-split val #\,)))
(num (string->number val))
(nums (map string->number (string-split val #\,))))