diff options
-rw-r--r-- | module/output/html.scm | 8 | ||||
-rw-r--r-- | static/style.css | 4 |
2 files changed, 7 insertions, 5 deletions
diff --git a/module/output/html.scm b/module/output/html.scm index 93fc5375..f73e975b 100644 --- a/module/output/html.scm +++ b/module/output/html.scm @@ -175,10 +175,10 @@ ,(tabset (append `(("๐
" ,(fmt-single-event ev)) - ("โค" (article (@ (style "font-family:sans")) - (p "Ladda ner") - (ul (li (a (@ (href ,(string-append "/calendar/" (prop ev 'UID) ".ics"))) "som iCal")) - (li (a (@ (href ,(string-append "/calendar/" (prop ev 'UID) ".xcs"))) "som xCal")))))) + ("โค" (div (@ (style "font-family:sans")) + (p "Ladda ner") + (ul (li (a (@ (href ,(string-append "/calendar/" (prop ev 'UID) ".ics"))) "som iCal")) + (li (a (@ (href ,(string-append "/calendar/" (prop ev 'UID) ".xcs"))) "som xCal")))))) (when (edit-mode) `(("</>" (script (@ (class "xcal") (type "application/calendar+xml")) diff --git a/static/style.css b/static/style.css index f7b8fbfa..f4a076fa 100644 --- a/static/style.css +++ b/static/style.css @@ -643,7 +643,9 @@ along with their colors. min-height: 20ch; } -.popup article { +.popup article, +.popup div +{ /* makes the text in the popup scroll, but not the sidebar */ overflow-y: auto; padding: 1em; |