     [:div {:style {:display "flex"}}
      (when-not (empty? data)
        [:div {:style {:flex "0 1 auto"}} [ExpandButton {:expanded? expanded?
-                                               :path path
-                                               :emit-fn emit-fn}]])
+                                                        :path path
+                                                        :emit-fn emit-fn}]])
      [:div {:style {:flex 1}}
       [:span (if (vector? data) "[" "(")]
       (if expanded?


(defn DataFriskShellVisibleButton [visible? toggle-visible-fn]
  [:button {:onClick toggle-visible-fn
         :style (merge {:border 0
                        :cursor "pointer"
                        :font "inherit"
                        :padding "12px"
                        :position "fixed"
                        :right 0
                        :width "80px"
                        :text-align "center"}
                  (:shell-visible-button styles)
                  (when-not visible? {:bottom 0}))}
   (if visible? "Hide" "Data frisk")])

(defn DataFriskShell [& data]
  (let [expand-by-default (reduce #(assoc-in %1 [:data-frisk %2 :expanded-paths] #{[]}) {} (range (count data)))

      (let [data-frisk (:data-frisk @state-atom)
            visible? (:visible? data-frisk)]
        [:div {:style (merge {:position "fixed"
                              :right 0
                              :bottom 0
                              :width "100%"
