aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorHugo Hörnquist <hugo@lysator.liu.se>2020-04-27 23:03:02 +0200
committerHugo Hörnquist <hugo@lysator.liu.se>2020-04-27 23:03:02 +0200
commit5028447c94ed8eeb759d45c7f8832703cf1aed19 (patch)
treed3f2e56bcc3a12bcc77bc998a5870985d662f9be
parentMove events-between to datetime/vcomponent. (diff)
downloadcalp-5028447c94ed8eeb759d45c7f8832703cf1aed19.tar.gz
calp-5028447c94ed8eeb759d45c7f8832703cf1aed19.tar.xz
Add hover-text to popup buttons.
-rw-r--r--module/output/html.scm6
1 files changed, 4 insertions, 2 deletions
diff --git a/module/output/html.scm b/module/output/html.scm
index d095493a..3f2025cd 100644
--- a/module/output/html.scm
+++ b/module/output/html.scm
@@ -107,8 +107,10 @@
`(div (@ (class "popup"))
(nav (@ (class "popup-control CAL_" ,(html-attr (or (attr (parent ev) 'NAME)
"unknown"))))
- (button (@ (class "btn") (onclick "close_popup(this)")) "×")
- (a (@ (class "btn") (href "/calendar/" ,(attr ev 'UID) ".ics"))
+ (button (@ (class "btn") (title "Stäng")
+ (onclick "close_popup(this)")) "×")
+ (a (@ (class "btn") (title "Ladda ner")
+ (href "/calendar/" ,(attr ev 'UID) ".ics"))
"📅"))
,(fmt-single-event ev)))