   [jsonml]
   (cond
     (and (array? jsonml)
-         (= "object" (get jsonml 0))) [data-structure jsonml]
+         (= "object" (first jsonml))) [data-structure jsonml]
     (array? jsonml)                   (mapv jsonml->hiccup jsonml)
     (object? jsonml)                  {:style (string->css (js->clj jsonml))}
-    :else                             (str->hiccup jsonml)))
+    (or (string? jsonml)
+        (integer? jsonml))            (str->hiccup jsonml)))
 
 (defn tab [data]
   [:div {:style {:flex "1 0 auto" :width "100%" :height "100%" :display "flex" :flex-direction "column"}}

        (= string "style")  :style
        (= string ", ")     " "
        :else               string))

(defn crawl
  [data]
  (if (coll? data)
    (into (view data) (mapv crawl data))
    (view data)))

(declare jsonml->hiccup)


            [devtools.formatters.core :as cljs-devtools]

            [cljs.pprint :refer [pprint]]))

(defn string->css [css-string]
  (->> (map #(str/split % #":") (str/split (get css-string "style") #";"))
