diff options
author | Hugo Hörnquist <hugo@lysator.liu.se> | 2020-03-31 00:42:49 +0200 |
---|---|---|
committer | Hugo Hörnquist <hugo@lysator.liu.se> | 2020-03-31 00:42:49 +0200 |
commit | 71410c00d3f304c23896e7838b73849b7b9613c8 (patch) | |
tree | a9bc8ac1de7baf9e539d81096908f01dba8207a8 /module/output/html.scm | |
parent | Update server-main to allow for IPv6. (diff) | |
download | calp-71410c00d3f304c23896e7838b73849b7b9613c8.tar.gz calp-71410c00d3f304c23896e7838b73849b7b9613c8.tar.xz |
Update HTML /static links to be absolute.
Diffstat (limited to '')
-rw-r--r-- | module/output/html.scm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/module/output/html.scm b/module/output/html.scm index 2ba13ed9..50822ccf 100644 --- a/module/output/html.scm +++ b/module/output/html.scm @@ -502,10 +502,10 @@ (meta (@ (name description) (content "Calendar for the dates between " ,(date->string start-date) " and " ,(date->string end-date)))) - ,(include-css "static/style.css") - ,(include-alt-css "static/dark.css" '(title "Dark")) - ,(include-alt-css "static/light.css" '(title "Light")) - (script (@ (src "static/script.js")) "") + ,(include-css "/static/style.css") + ,(include-alt-css "/static/dark.css" '(title "Dark")) + ,(include-alt-css "/static/light.css" '(title "Light")) + (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))) |