From 996f9a20ad329dfc8bb35945b44471bfae315ada Mon Sep 17 00:00:00 2001 From: unwox Date: Fri, 5 Sep 2025 10:24:45 +0600 Subject: small fixes --- pages/index.fnl | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) (limited to 'pages/index.fnl') diff --git a/pages/index.fnl b/pages/index.fnl index f0ac111..a7761a2 100644 --- a/pages/index.fnl +++ b/pages/index.fnl @@ -1,4 +1,4 @@ -(import-macros {:compile-html <>} :macros) +(import-macros {:compile-html HTML} :macros) (local lib (require :lib)) (local templates (require :templates)) @@ -23,13 +23,13 @@ (fn pick-gallery-photo [list] (let [chosen (. list (math.random (# list)))] - (<> + (HTML [:div {} - [:a {:href (.. "static/" chosen.name ".webp") :target "_blank"} - [:img {:src (.. "static/" chosen.name "-p.webp") :alt chosen.alt}]]]))) + [:a {:href (.. "static/" chosen.name ".webp") :target "_blank"} ""] + [:img {:src (.. "static/" chosen.name "-p.webp") :alt chosen.alt}]]))) (fn content [authenticated?] - [(<> + [(HTML [:div {:class "side mb-2"} (templates.header "" authenticated?) [:section {:class "mb-2"} @@ -45,7 +45,7 @@ [:div {:class "mb-1"} [:NO-ESCAPE texts.weekly-meetings]] [:div {} [:a {:href "https://t.me/whitetoadtea"} "Подписаться ⟶"]]]]]) - (<> + (HTML [:div {:class "content"} [:div {:class "gallery"} (pick-gallery-photo [{:name "people" :alt "Люди в чайной"} -- cgit v1.2.3