   (let [filter-input     (r/atom "")
         filter-items     (r/atom [])
         filter-type      (r/atom :contains)
-        input-error      (r/atom false)]
+        input-error      (r/atom false)
+        trace-details    (r/atom {:showing false})]
     (fn []
       (let [showing-traces       (if (= @filter-items [])
                                    @traces

                                          :white-space "nowrap"})}

                (.toFixed duration 1) " ms"]]
              (when true
                [:tr {:key (str id "-details")}
                 [:td {:col-span 3} (with-out-str (pprint/pprint (dissoc tags :query-v :event :duration)))]]))))))


               (when (pos? (count @traces))
                 [:span "(" [:button.text-button {:on-click #(do (trace/reset-tracing!) (reset! traces []))} "clear"] ")"])]
             [:th "meta"]]
            [:tbody (render-traces showing-traces trace-details)]]]]))))

(defn resizer-style [draggable-area]
  {:position "absolute" :z-index 2 :opacity 0
