diff options
Diffstat (limited to '')
-rw-r--r-- | module/output/xcal.scm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/module/output/xcal.scm b/module/output/xcal.scm index 554955c5..fc2a30b0 100644 --- a/module/output/xcal.scm +++ b/module/output/xcal.scm @@ -16,7 +16,8 @@ (define writer (cond - [(and=> (prop vline 'VALUE) string->symbol) => get-writer] + [(and=> (prop vline 'VALUE) (compose string->symbol car)) + => get-writer] [(memv key '(COMPLETED DTEND DUE DTSTART RECURRENCE-ID CREATED DTSTAMP LAST-MODIFIED ACKNOWLEDGED EXDATE)) |