diff options
| author | Hugo Hörnquist <hugo@hornquist.se> | 2019-05-06 17:59:13 +0200 |
|---|---|---|
| committer | Hugo Hörnquist <hugo@hornquist.se> | 2019-05-06 17:59:13 +0200 |
| commit | 8139ff9b8f512e8003786e07bd546e1ad74ea3dd (patch) | |
| tree | 1a7bd9dbb3fa0a8f15fddfd92074a5e532c546f4 /module | |
| parent | Add marker on today in small calendar. (diff) | |
| download | calp-8139ff9b8f512e8003786e07bd546e1ad74ea3dd.tar.gz calp-8139ff9b8f512e8003786e07bd546e1ad74ea3dd.tar.xz | |
Add unused js for creating events.
Diffstat (limited to 'module')
| -rw-r--r-- | module/output/html.scm | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/module/output/html.scm b/module/output/html.scm index 1614bc31..0c8c3eb3 100644 --- a/module/output/html.scm +++ b/module/output/html.scm @@ -230,9 +230,10 @@ (meta (@ (name viewport) (content "width=device-width, initial-scale=0.5"))) (meta (@ (name description) - (content "Calendar for the dates between " (date->string start) - " and " (date->string end)))) + (content "Calendar for the dates between " ,(date->string start) + " and " ,(date->string end)))) ,(include-css "static/style.css") + ;; (script (@ (src "static/script.js")) "") (style ,(format #f "~:{.CAL_~a { background-color: ~a; color: ~a }~%.CAL_bg_~a { border-color: ~a }~%~}" (map (lambda (c) (let* ((name (html-attr (attr c 'NAME))) |