check pre-rendering

mvc-works · Jan 25, 2017 · 5beed35 · 5beed35
1 parent cd3025a
commit 5beed35
Show file tree

Hide file tree

Showing 2 changed files with 8 additions and 9 deletions.
diff --git a/build.boot b/build.boot
@@ -15,8  15,7 @@
 
 (require '[adzerk.boot-cljs   :refer [cljs]]
          '[adzerk.boot-reload :refer [reload]]
-         '[adzerk.boot-test   :refer :all]
-         '[clojure.java.io    :as    io])
          '[adzerk.boot-test   :refer :all])
 
 (def  version  "0.1.0")
 

diff --git a/tasks/render.cljs b/tasks/render.cljs
@@ -23,21  23,21 @@
         (div {:attrs {:id "app" :innerHTML html-content}})
         (script {:attrs {:src "main.js"}})))))
 
-(defn generate-html [ssr-stages]
-  (let [ tree (comp-container {} ssr-stages)
 (defn generate-html []
   (let [ tree (comp-container {} #{:shell})
          html-content (make-string tree)]
-    (html-dsl {:build? true} html-content ssr-stages)))
     (html-dsl {:build? true} html-content #{:shell})))
 
-(defn generate-empty-html [ssr-stages]
-  (html-dsl {:build? true} "" ssr-stages))
 (defn generate-empty-html []
   (html-dsl {:build? true} "" {}))
 
 (defn spit [file-name content]
   (let [fs (js/require "fs")]
     (.writeFileSync fs file-name content)))
 
 (defn -main []
   (if (= js/process.env.env "dev")
-    (spit "target/dev.html" (generate-empty-html #{:shell}))
-    (spit "target/index.html" (generate-html #{:shell}))))
     (spit "target/dev.html" (generate-empty-html))
     (spit "target/index.html" (generate-html))))
 
 (-main)