summaryrefslogtreecommitdiff
path: root/pages/index.fnl
diff options
context:
space:
mode:
authorunwox <me@unwox.com>2025-09-05 10:24:45 +0600
committerunwox <me@unwox.com>2025-09-05 13:45:31 +0600
commit996f9a20ad329dfc8bb35945b44471bfae315ada (patch)
treeedcf562ab7e5a1fd1b7a8a2f50d4c1371c718416 /pages/index.fnl
parent66c51b0e714fa8a1c80784108191270babc8525e (diff)
small fixes
Diffstat (limited to 'pages/index.fnl')
-rw-r--r--pages/index.fnl12
1 files changed, 6 insertions, 6 deletions
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 "Люди в чайной"}