           (and @expanded?
                (or (string? data)
                    (number? data))) [:div {:style {:margin "10px 0"}} data]
-          @expanded? (jsonml->hiccup (cljs-devtools/header-api-call data config)))]])))
+          @expanded? (jsonml->hiccup (cljs-devtools-header data)))]])))
 
 (defn render-state [data]
   (let [subtree-input (r/atom "")

               :on-click #(swap! expanded? not)}
        [:button.expansion-button (if @expanded? "▼" "▶")]]
       (jsonml->hiccup (if @expanded?
                         (cljs-devtools/body-api-call
                           (.-object (get jsonml 1))
                           (.-config (get jsonml 1)))
                         (cljs-devtools/header-api-call
                           (.-object (get jsonml 1))
                           (.-config (get jsonml 1)))))])))


(ns day8.re-frame.trace.app-db
  (:require-macros [day8.re-frame.trace.macros :refer [with-cljs-devtools-prefs]])
  (:require [reagent.core :as r]
            [clojure.string :as str]
            [devtools.prefs]
            [devtools.formatters.core]
            [day8.re-frame.trace.localstorage :as localstorage]
            [day8.re-frame.trace.components :as components]))

(defn string->css [css-string]
  "This function converts jsonml css-strings to valid css maps for hiccup.
