aboutsummaryrefslogtreecommitdiff
path: root/module/vcomponent/recurrence/internal.scm
diff options
context:
space:
mode:
Diffstat (limited to 'module/vcomponent/recurrence/internal.scm')
-rw-r--r--module/vcomponent/recurrence/internal.scm3
1 files changed, 2 insertions, 1 deletions
diff --git a/module/vcomponent/recurrence/internal.scm b/module/vcomponent/recurrence/internal.scm
index ae521d77..0503081c 100644
--- a/module/vcomponent/recurrence/internal.scm
+++ b/module/vcomponent/recurrence/internal.scm
@@ -1,6 +1,7 @@
(define-module (vcomponent recurrence internal)
#:export (repeating? format-recur-rule make-recur-rule)
+ #:use-module (srfi srfi-71)
#:use-module (srfi srfi-88) ; better keywords
#:use-module ((vcomponent base) :select (prop))
#:use-module (srfi srfi-9)
@@ -79,7 +80,7 @@
(define (byday->string pair)
- (let* (((off . day) pair))
+ (let ((off day (car+cdr pair)))
(string-append
(or (and=> off number->string) "")
(string-upcase