        hick/as-hiccup
        (walk/postwalk (fn [t] (cond (string? t) (tokenize-string t)
                                     (like-html-vec? t) (update-in t [1] grab-om-attrs [:om-if :om-repeat])
-                                    :else t)))))
+                                    :else t)))
+       (walk/postwalk flatten-out)))
 
 (defn load-templates [names get-html-template callback]
   (mapv #(->> (fn [response]

               not)
          x))

(defn split-dbl-brackets
  [t]
  (-> t

              (get-html-template %))
        names))

(defn template->hiccup
  [tmplt state]
  (walk/prewalk (fn [x]
                  (cond (and (vector? x)
                             (= (first x) :om-code)) (get state (second x) "")
                        :else x))
                tmplt))

#_ (-> "<div>{{a}}</div" html->template (template->hiccup {"a" 33}))

#_(html->template "<div>a <span></span></div>")


#_(load-templates ["hello.html"]
                  (fn [n h] (println "in get-html-template") (h "<div></div"))
