                                  [:span.subtree-button-string
                                    (str path)]]]]])
                 @subtree-paths))]
-          [subtree @data [:span.label "app-state"]]]])))
+          [subtree @data [:span.label "app-db"]]]])))

       (map #(str/split % #":"))
       (reduce (fn [acc [property value]]
                 (assoc acc (keyword property) value)) {})))

(declare jsonml->hiccup)


            (and @expanded?
              (or (string? data)
                  (number? data)))  [:div {:style {:margin "10px 0"}} data]
            @expanded?              (jsonml->hiccup (cljs-devtools/header-api-call data config :extra)))]])))

(defn render-state  [data]
  (let [subtree-input  (r/atom "")
