diff options
| author | Hugo Hörnquist <hugo@lysator.liu.se> | 2021-11-15 01:39:46 +0100 |
|---|---|---|
| committer | Hugo Hörnquist <hugo@lysator.liu.se> | 2021-11-15 01:39:46 +0100 |
| commit | e8216ceb2cb5c61ef6fd6d6f6c9151511d01d8e9 (patch) | |
| tree | 4d8074e90507198fea5da6f28323d5a70ffa9e8d /module/calp/html/view/calendar.scm | |
| parent | Fix calendar for popup. (diff) | |
| download | calp-e8216ceb2cb5c61ef6fd6d6f6c9151511d01d8e9.tar.gz calp-e8216ceb2cb5c61ef6fd6d6f6c9151511d01d8e9.tar.xz | |
Propagate default-calendar from backend to frontend.
Diffstat (limited to 'module/calp/html/view/calendar.scm')
| -rw-r--r-- | module/calp/html/view/calendar.scm | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/module/calp/html/view/calendar.scm b/module/calp/html/view/calendar.scm index 580d721e..64ee1c7c 100644 --- a/module/calp/html/view/calendar.scm +++ b/module/calp/html/view/calendar.scm @@ -94,7 +94,14 @@ (meta (@ (name end-time) (content ,(date->string (date+ end-date (date day: 1)) "~s")))) - (script "EDIT_MODE=" ,(if (edit-mode) "true" "false") ";") + (script + ,(format #f + " +EDIT_MODE=~:[false~;true~]; +window.default_calendar='~a';" + (edit-mode) + (base64encode (get-config 'default-calendar)))) + (style ,(format #f "html { --editmode: 1.0; |