From feebf252b4a51467863ccba5d25b180548f79ef2 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= Date: Wed, 6 Apr 2022 01:09:31 +0200 Subject: work --- module/calp/html/view/calendar/month.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'module/calp/html/view/calendar/month.scm') diff --git a/module/calp/html/view/calendar/month.scm b/module/calp/html/view/calendar/month.scm index 2b4c888a..b5328571 100644 --- a/module/calp/html/view/calendar/month.scm +++ b/module/calp/html/view/calendar/month.scm @@ -11,7 +11,7 @@ :select (really-long-event? events-between)) :use-module ((calp html vcomponent) - :select (make-block output-uid)) + :select (make-block)) :use-module ((vcomponent util group) :select (group-stream get-groups-between)) ) @@ -83,7 +83,7 @@ (events-between pre-start post-end events)) `(popup-element (@ (class "vevent") - (data-uid ,(output-uid event))))) + (data-uid ,(prop event 'UID))))) (template (@ (id "vevent-block")) -- cgit v1.2.3