diff options
Diffstat (limited to '')
-rw-r--r-- | module/output/html.scm | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/module/output/html.scm b/module/output/html.scm index e3668f08..6e6fcd30 100644 --- a/module/output/html.scm +++ b/module/output/html.scm @@ -125,6 +125,7 @@ `(div (@ (class "tab")) (input (@ (type "radio") (id ,id) (name ,tabgroup) ,@(when (zero? i) '((checked))))) + ;; TODO title attribute for label (label (@ (for ,id) (style "top: " ,(* 6 i) "ex")) ,key) (div (@ (class "content")) ,body))))) @@ -144,14 +145,13 @@ onclick: "remove_event(document.getElementById(this.closest('.popup-container').id.substr(5)))")) ,(tabset - (append - `(("๐
" ,(fmt-single-event ev)) - ("โค" (div (@ (style "font-family:sans")) - (p "Ladda ner") - (ul (li (a (@ (href "/calendar/" ,(prop ev 'UID) ".ics")) - "som iCal")) - (li (a (@ (href "/calendar/" ,(prop ev 'UID) ".xcs")) - "som xCal"))))))))))) + `(("๐
" ,(fmt-single-event ev)) + ("โค" (div (@ (style "font-family:sans")) + (p "Ladda ner") + (ul (li (a (@ (href "/calendar/" ,(prop ev 'UID) ".ics")) + "som iCal")) + (li (a (@ (href "/calendar/" ,(prop ev 'UID) ".xcs")) + "som xCal")))))))))) |