aboutsummaryrefslogtreecommitdiff
path: root/module/vcomponent/xcal/output.scm
diff options
context:
space:
mode:
authorHugo Hörnquist <hugo@lysator.liu.se>2021-10-04 23:24:30 +0200
committerHugo Hörnquist <hugo@lysator.liu.se>2021-10-04 23:24:30 +0200
commitac60dd147a15d2890828ae38b818685416477c09 (patch)
tree394d58680e72cd6ec5e136d138ffd4ebbc3cd48c /module/vcomponent/xcal/output.scm
parentMajor typescript work. (diff)
parentWork on calendar from event in frontend, broken. (diff)
downloadcalp-ac60dd147a15d2890828ae38b818685416477c09.tar.gz
calp-ac60dd147a15d2890828ae38b818685416477c09.tar.xz
Merge branch 'new-js' into typescript
Diffstat (limited to '')
-rw-r--r--module/vcomponent/xcal/output.scm5
1 files changed, 4 insertions, 1 deletions
diff --git a/module/vcomponent/xcal/output.scm b/module/vcomponent/xcal/output.scm
index 692b3ec2..095c61c2 100644
--- a/module/vcomponent/xcal/output.scm
+++ b/module/vcomponent/xcal/output.scm
@@ -121,7 +121,10 @@
,(vline->value-tag vline)))])
(properties component))))
(unless (null? props)
- `(properties ,@props)))
+ `(properties
+ ;; NOTE
+ (x-hnh-calendar-name (text ,(prop (parent component) 'NAME)))
+ ,@props)))
,(unless (null? (children component))
`(components ,@(map vcomponent->sxcal (children component)))))))