diff options
| author | Hugo Hörnquist <hugo@lysator.liu.se> | 2021-11-09 15:13:33 +0100 |
|---|---|---|
| committer | Hugo Hörnquist <hugo@lysator.liu.se> | 2021-11-09 15:13:33 +0100 |
| commit | 3d3f46d12abb7d18b33f3b22e51b1a4c154bf85f (patch) | |
| tree | 5722c4c168e8c299cdb89143d63b10d7d5102b4e /module/calp/html/view/calendar/week.scm | |
| parent | Major work on event creation. (diff) | |
| download | calp-3d3f46d12abb7d18b33f3b22e51b1a4c154bf85f.tar.gz calp-3d3f46d12abb7d18b33f3b22e51b1a4c154bf85f.tar.xz | |
Better handle debug tab.
Diffstat (limited to 'module/calp/html/view/calendar/week.scm')
| -rw-r--r-- | module/calp/html/view/calendar/week.scm | 10 |
1 files changed, 9 insertions, 1 deletions
diff --git a/module/calp/html/view/calendar/week.scm b/module/calp/html/view/calendar/week.scm index 93d11c25..cc89d77b 100644 --- a/module/calp/html/view/calendar/week.scm +++ b/module/calp/html/view/calendar/week.scm @@ -111,7 +111,15 @@ (span (@ (slot "label")) "🖊") (vevent-edit (@ (slot "content") (class "populate-with-uid"))) - )) + ) + ,@(when (debug) + `((tab-element + (@ (title "Debug")) + (span (@ (slot "label")) "🐸") + (vevent-dl (@ (slot "content") + (class "populate-with-uid"))) + + )))) ;; ,(tabset ;; `(("📅" title: "Översikt" |