From 002787fd54d7e7b5dc2965e164691f85cccc3953 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= <hugo@lysator.liu.se>
Date: Wed, 12 Aug 2020 14:04:31 +0200
Subject: Can create events in different calentdars, given that the calendars
 have simple names.

---
 module/html/vcomponent.scm | 1 +
 1 file changed, 1 insertion(+)

(limited to 'module')

diff --git a/module/html/vcomponent.scm b/module/html/vcomponent.scm
index fdaea217..5e7b4ba8 100644
--- a/module/html/vcomponent.scm
+++ b/module/html/vcomponent.scm
@@ -142,6 +142,7 @@
        (div (@ ,@(assq-merge
                   extra-attributes
                   `((id ,(html-id ev))
+                    (data-calendar ,(html-attr (or (prop (parent ev) 'NAME) "unknown")))
                     (class "event CAL_" ,(html-attr (or (prop (parent ev) 'NAME)
                                                         "unknown"))
                       ,(when (and (prop ev 'PARTSTAT)
-- 
cgit v1.2.3