Formatting.
continuous-integration/drone/push Build is failing Details

This commit is contained in:
Oliver Marks 2021-01-29 12:10:07 +00:00
parent e9dd6a2261
commit 0eeae61728
1 changed files with 24 additions and 22 deletions

View File

@ -66,6 +66,8 @@
;; form one component ro render a nav link ;; form one component ro render a nav link
(defn navbar-link [{:keys [href title text] :or {text nil title nil}}] (defn navbar-link [{:keys [href title text] :or {text nil title nil}}]
[:a.link.dim.white.dib.mr3 {:key href :href href :title title} text]) [:a.link.dim.white.dib.mr3 {:key href :href href :title title} text])
@ -82,15 +84,11 @@
;; form one homepage component ;; form one homepage component
(defn home-page [] (defn home-page []
[:<> [:<>
[my-component "component 1"] [:h1 (:lorem @site-state)]
[my-component "component 2"] [articles
[circle {:alt "test"}] {:title "Clojure Demos"
[:p (:lorem @site-state)]
[articles {:title "demos"
:articles [{:title "DSL Demo" :articles [{:title "DSL Demo"
:link (rfe/href ::demo {:page "dsl-demo"}) :link (rfe/href ::demo {:page "dsl-demo"})
:img-src "https://miro.medium.com/max/1400/1*CEYFj5R57UFyCXts2nsBqA.png"} :img-src "https://miro.medium.com/max/1400/1*CEYFj5R57UFyCXts2nsBqA.png"}
@ -116,6 +114,10 @@
(fn [route] (fn [route]
;[:div (-> route :parameters :path :page)] ;[:div (-> route :parameters :path :page)]
[:main.mt4 [:main.mt4
[my-component "component 1"]
[my-component "component 2"]
[circle {:alt "test"}]
[:div.mw7.center.avenir @content] [:div.mw7.center.avenir @content]
#_[article {:title "Homepage" #_[article {:title "Homepage"
:description @content :description @content