From 816c6cea6a9b4438db7a81f77f85cce84cc4755e Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= Date: Thu, 14 Jan 2021 00:15:16 +0100 Subject: xcal parse now handles WKST in RRULE's. --- module/vcomponent/xcal/parse.scm | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) (limited to 'module/vcomponent/xcal/parse.scm') diff --git a/module/vcomponent/xcal/parse.scm b/module/vcomponent/xcal/parse.scm index 6b752874..6ae8c2f9 100644 --- a/module/vcomponent/xcal/parse.scm +++ b/module/vcomponent/xcal/parse.scm @@ -52,7 +52,13 @@ (apply (@ (vcomponent recurrence internal) make-recur-rule) (concatenate (for (k v) in value - (list (symbol->keyword k) v))))] + (list (symbol->keyword k) + (case k + ((wkst) + ((@ (vcomponent recurrence parse) + rfc->datetime-weekday) + (string->symbol v))) + (else v))))))] [(time) (parse-iso-time (car value))] -- cgit v1.2.3