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,24 +84,20 @@
;; 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 "DSL Demo"
[articles {:title "demos" :link (rfe/href ::demo {:page "dsl-demo"})
:articles [{:title "DSL Demo" :img-src "https://miro.medium.com/max/1400/1*CEYFj5R57UFyCXts2nsBqA.png"}
:link (rfe/href ::demo {:page "dsl-demo"}) {:title "Datalog Demo"
:img-src "https://miro.medium.com/max/1400/1*CEYFj5R57UFyCXts2nsBqA.png"} :link (rfe/href ::demo {:page "datalog-demo"})
{:title "Datalog Demo" :img-src "https://raw.githubusercontent.com/tonsky/datascript/master/extras/logo.svg"}
:link (rfe/href ::demo {:page "datalog-demo"}) {:title "Reagent Demo"
:img-src "https://raw.githubusercontent.com/tonsky/datascript/master/extras/logo.svg"} :link (rfe/href ::demo {:page "reagent-demo"})
{:title "Reagent Demo" :img-src "https://raw.githubusercontent.com/reagent-project/reagent/master/logo/logo-text.png"}]}]])
:link (rfe/href ::demo {:page "reagent-demo"})
:img-src "https://raw.githubusercontent.com/reagent-project/reagent/master/logo/logo-text.png"}]}]])
;; form one render demo component ;; form one render demo component
(defn demo-page [route] (defn demo-page [route]
@ -109,17 +107,21 @@
{:response-format (raw-response-format) {:response-format (raw-response-format)
:handler (fn [response] :handler (fn [response]
(->> response (->> response
parse parse
org->replacements org->replacements
(reset! content)) (reset! content))
#_(reset! content (org->replacements (parse response))))}) #_(reset! content (org->replacements (parse response))))})
(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
:tagline "tagline here"}]]))) :tagline "tagline here"}]])))
;; form one render about page component ;; form one render about page component
(defn about-page [] (defn about-page []
@ -198,5 +200,5 @@
(comment (comment
@site-state @site-state
(GET "/test.org" {:handler (fn [response] (swap! site-state assoc :content response))})) (GET "/test.org" {:handler (fn [response] (swap! site-state assoc :content response))}))