diff options
| author | Hugo Hörnquist <hugo@lysator.liu.se> | 2020-08-11 20:17:25 +0200 |
|---|---|---|
| committer | Hugo Hörnquist <hugo@lysator.liu.se> | 2020-08-11 20:26:11 +0200 |
| commit | 54c613f48caa01f05fac2774dc2d2253568b552e (patch) | |
| tree | f5a621b52e576594707af58afc9fc864ed90a0e7 /module | |
| parent | Mercge CAL and CAL_bg css classes. (diff) | |
| download | calp-54c613f48caa01f05fac2774dc2d2253568b552e.tar.gz calp-54c613f48caa01f05fac2774dc2d2253568b552e.tar.xz | |
Add dropdown editing event.
Diffstat (limited to 'module')
| -rw-r--r-- | module/html/view/calendar.scm | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/module/html/view/calendar.scm b/module/html/view/calendar.scm index 4fad41c8..39f1092d 100644 --- a/module/html/view/calendar.scm +++ b/module/html/view/calendar.scm @@ -287,7 +287,14 @@ `(li (@ (class "CAL_" ,(html-attr (prop calendar 'NAME)))) ,(prop calendar 'NAME))) - calendars)))) + calendars)) + (div (@ (id "calendar-dropdown-template") (class "template")) + (select + ,@(map (lambda (calendar) + `(option (@ (value ,(prop calendar 'NAME))) + ,(prop calendar 'NAME))) + calendars)) + ))) ;; List of events (div (@ (class "eventlist") |