status-im
/
reagent
mirror of https://github.com/status-im/reagent.git
2
0
Fork 0
Code Issues Projects Releases Wiki Activity

Cosmetics

This commit is contained in:
Dan Holmsand 2015-09-09 22:05:14 +02:00
parent 679d75bf5d
commit 2cb96ca5d2
1 changed files with 3 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
demo/sitetools/core.cljs
View File

@ -18,8 +18,7 @@
{:pre [(satisfies? ISwap a)
(ifn? f)]}
(if a.rswapping
(-> (or a.rswapfs
(set! a.rswapfs (array)))
(-> (or a.rswapfs (set! a.rswapfs (array)))
(.push #(apply f % args)))
(do (set! a.rswapping true)
(try (swap! a (fn [state]
@ -138,7 +137,7 @@
(r/render-to-static-markup
[:html
[:head
[:meta {:charset "utf-8"}]
[:meta {:charset 'utf-8}]
[:meta {:name 'viewport
:content "width=device-width, initial-scale=1.0"}]
[:base {:href (prefix "" (:page-name page-conf))}]
@ -155,7 +154,7 @@
(let [b (:body conf)
_ (assert (vector? b))
bhtml (r/render-component-to-string b)]
(str "<!doctype html>"
(str "<!doctype html>\n"
(html-template (assoc conf
:page-conf {:page-name page-name}
:body-html bhtml)))))