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.scm10
1 files changed, 6 insertions, 4 deletions
diff --git a/module/vcomponent/recurrence/parse.scm b/module/vcomponent/recurrence/parse.scm
index 04c785a4..680a818e 100644
--- a/module/vcomponent/recurrence/parse.scm
+++ b/module/vcomponent/recurrence/parse.scm
@@ -1,14 +1,16 @@
(define-module (vcomponent recurrence parse)
+ #:duplicates (last) ; Replace @var{count}
+
+ #: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-26)
#:use-module ((vcomponent datetime) #:select (parse-datetime))
- #:duplicates (last) ; Replace @var{count}
#:use-module (vcomponent recurrence internal)
#:use-module (util)
- #:use-module (ice-9 match)
- #:export (parse-recurrence-rule))
+ #:use-module (ice-9 match))
;; @example
@@ -76,7 +78,7 @@
(else o)))))
;; obj
- (make-recur-rule 1 'MO)
+ (make-recur-rule (interval 1) (wkst 'MO))
;; ((key val) ...)
(map (cut string-split <> #\=)