Improvements

This commit is contained in:
Yann Esposito (Yogsototh) 2024-08-14 16:20:27 +02:00
parent 094ba5c078
commit d559589325
Signed by untrusted user who does not match committer: yogsototh
GPG key ID: 7B19A4C650D59646
2 changed files with 27 additions and 62 deletions

File diff suppressed because one or more lines are too long

View file

@ -292,9 +292,7 @@
:alt "another image"}]]]]
images-section {:title "Images"
:cards [images
figures
]}
figures]}
text-buttons [:div.inner {:id "text-buttons"}
[:h3 "Textual buttons"]
@ -539,32 +537,28 @@
[:div.inner
[:h3 "With default gap"]
[:div.content
(for [i (range 12 -1 -1)]
(for [i (range 11 0 -1)]
(let [cl (str "c" i)
co-cl (str "c" (- 12 i))]
[:div.row
(when (> i 0)
[:div.bg-neutral {:class cl} cl])
(when (> (- 12 i) 0)
[:div.y {:class co-cl} co-cl])]))]]
[:div.bg-neutral {:class cl} cl]
[:div.y {:class co-cl} co-cl]]))]]
grid-gapless
[:div.inner
[:h3 "Gapless"]
[:div.content
(for [i (range 12 -1 -1)]
(for [i (range 11 0 -1)]
(let [cl (str "c" i)
co-cl (str "c" (- 12 i))]
[:div.row.gapless
(when (> i 0)
[:div.bg-neutral {:class cl} cl])
(when (> (- 12 i) 0)
[:div.y {:class co-cl} co-cl])]))]]
[:div.bg-neutral {:class cl} cl]
[:div.y {:class co-cl} co-cl]]))]]
grid-3col
[:div.inner
[:h3 "3 columns"]
[:div.content
(for [i (range 11 0 -1)
j (range (- 11 i) -1 -1)]
(for [i (range 11 0 -1) ;; from 11 to 1
j (range (- 11 i) -1 -1)] ;; from (11 - i) to 0
(let [k (- 12 i j)
cli (str "c" i)
clj (str "c" j)
@ -572,34 +566,25 @@
(if (= j 0)
[:br]
[:div.row
(when (> j 0)
[:div.b {:class clj} clj])
(when (> i 0)
[:div.bg-neutral {:class cli} cli])
(when (> k 0)
[:div.r {:class clk} clk])
])))]]
[:div.b {:class clj} clj]
[:div.bg-neutral {:class cli} cli]
[:div.r {:class clk} clk]]))
)]]
grid-section {:title "Grid"
:cards [grid grid-gapless grid-3col]}
all-sections [textual-section
grid-section
images-section
icons-section
forms-section
tables-section
buttons-section
messages-section
navbar-section
footer-section]]
:cards [grid grid-gapless grid-3col]}]
[:div.container
[:h1 "Documentation"]
[:p "Here a bunch of examples with their source code to make them happen."]
[:ul
(for [{:keys [title]} all-sections]
[:li [:a {:href (str "#" title)} title]])]
(for [{:keys [title cards]} all-sections]
(for [{:keys [title cards]} [textual-section
grid-section
images-section
icons-section
forms-section
tables-section
buttons-section
messages-section
navbar-section
footer-section]]
[:div.col
[:h2 {:id title}
[:a {:href (str "#" title)} [:i.ico "[§]"]] " "