diff options
Diffstat (limited to '')
-rw-r--r-- | module/vcomponent/formats/xcal/output.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/module/vcomponent/formats/xcal/output.scm b/module/vcomponent/formats/xcal/output.scm index 6d5e0656..a5f8a934 100644 --- a/module/vcomponent/formats/xcal/output.scm +++ b/module/vcomponent/formats/xcal/output.scm @@ -111,7 +111,7 @@ (match-lambda [(? (compose internal-field? car)) #f] - [(key vlines ...) + [(key (vlines ...)) (remove null? `(,(xml xcal (downcase-symbol key)) ,(parameters-tag (reduce assq-merge @@ -120,7 +120,7 @@ ,@(for vline in vlines (vline->value-tag vline))))] - [(key . vline) + [(key vline) (remove null? `(,(xml xcal (downcase-symbol key)) ,(parameters-tag (parameters vline)) |