From 080470b1428a0ca58a9ed7eb7aac8050f26543a2 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= Date: Thu, 9 Jul 2020 16:51:20 +0200 Subject: HTML Download tab now div instead of article. --- module/output/html.scm | 8 ++++---- 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; -- cgit v1.2.3