diff options
Diffstat (limited to 'module/output/html.scm')
| -rw-r--r-- | module/output/html.scm | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/module/output/html.scm b/module/output/html.scm index 74ed2f97..d59574a0 100644 --- a/module/output/html.scm +++ b/module/output/html.scm @@ -388,8 +388,16 @@ ;; next button ,(nav-link "ยป" (month+ start-date))) + ;; List of events (div (@ (class "eventlist")) + ;; List of calendars + (div (@ (class "calendarlist")) + (ul ,@(map (lambda (calendar) + `(li (@ (class "CAL_bg_" ,(html-attr (attr calendar 'NAME)))) + ,(attr calendar 'NAME))) + calendars))) + ;; Events which started before our start point, but "spill" into our time span. (section (@ (class "text-day")) (header (h2 "Tidigare")) |