                not)
           x))
 
+(defn flatten-out
+  [t]
+  (if (like-html-vec? t)
+    (into (->> t (take 2) vec)
+          (mapcat #(if (and (sequential? %)
+                            (-> % like-html-vec? not))
+                     %
+                     [%])
+                  (drop 2 t)))
+    t))
+
+#_(flatten-out [:div {} "a" [:div {}] '("whoa" [:a ""])])
+
+
 (defn split-dbl-brackets
   [t]
   (-> t

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



#_(html->template "<div om-repeat='{{a}}'></div>")

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

       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)))
       (walk/postwalk flatten-out)))

(defn load-templates [names get-html-template callback]
  (mapv #(->> (fn [response]
