oly
/
weecfg
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Clean up project code.

This commit is contained in:
Oliver Marks 2019-09-17 19:38:13 +01:00
parent ddd88b4aad
commit 569c11f96e
1 changed files with 4 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
src/weecfg/core.cljs
View File

@ -73,8 +73,6 @@
; handle failures ; handle failures
(defn handle-failure [{:keys [status status-text response]}] (defn handle-failure [{:keys [status status-text response]}]
(case status (case status
500 (do (reset! form-errors "Something bad happened submitting your data.")) 500 (do (reset! form-errors "Something bad happened submitting your data."))
@ -92,7 +90,6 @@
(let [form (read-string response) (let [form (read-string response)
title (:title form) title (:title form)
fields (:fields form)] fields (:fields form)]
(reset! form-fields form-title) (reset! form-fields form-title)
(reset! form-fields fields)))})) (reset! form-fields fields)))}))
@ -138,7 +135,7 @@
[:p "Device will reboot in a few seconds and connect to your wifi."]]]) [:p "Device will reboot in a few seconds and connect to your wifi."]]])
(defn about-page [] (defn about-page []
[:div [:div.w-50
[:div [:h1.m-4 "About Page"] [:div [:h1.m-4 "About Page"]
[:p "Sample app, demoing using ajax calls and reagent to render the page with some simple route from reitit, basically enought to get you started on your clojurescript journey."] [:p "Sample app, demoing using ajax calls and reagent to render the page with some simple route from reitit, basically enought to get you started on your clojurescript journey."]
[:a.link {:href (path-for :index)} "Back"]]]) [:a.link {:href (path-for :index)} "Back"]]])
@ -159,12 +156,12 @@
(fn [] (fn []
(let [page (:current-page (session/get :route))] (let [page (:current-page (session/get :route))]
[:div.bg-green.flex.justify-center.items-center.h-100 [:div.bg-green.flex.justify-center.items-center.h-100
[:div.w-25 [:div.w-35
[:h2.w-100 [:h2.w-100
[:a.link.fr.black {:href (path-for :about)} [:i.fas.fa-question-circle]] [:a.link.fr.black.pt3.pb3 {:href (path-for :about)} [:i.fas.fa-question-circle]]
[:a.athelas.f3.link.white-70.hover-white.no-underline.flex.items-center.pa3 [:a.athelas.f3.link.white-70.hover-white.no-underline.flex.items-center.pa3
{:href "/"} {:href "/"}
[:i.fas.fa-surprise.mr3] "GASP Sensor setup"]] [:i.fas.fa-surprise.mr3.v-mid] "GASP Sensor setup"]]
[page]]]))) [page]]])))
; sort out routing sessions and basically kickstart everything ; sort out routing sessions and basically kickstart everything