     (fn [trace]
       (< (:query query) (:duration trace)))))
 
-(defn render-traces [showing-traces trace-details]
+(defn render-traces [showing-traces trace-detail-expansions]
   (doall
     (for [{:keys [op-type id operation tags duration] :as trace} showing-traces]
       (let [padding   {:padding "0px 5px 0px 5px"}
             row-style (merge padding {:border-top (case op-type :event "1px solid lightgrey" nil)})
-            keyword-id (keyword (str id))
             #_#__ (js/console.log (devtools/header-api-call tags))]
         (list [:tr {:key   id
                     :style {:color (case op-type

            [:thead>tr
             [:th [:button.text-button
                   {:style {:cursor "pointer"}
                    :on-click #(reset! trace-details {:showing (not (:showing @trace-details))})}
                   (if (:showing @trace-details) "-" "+")]]
             [:th "operations"]
             [:th
               (when (pos? (count @filter-items))

                                     :re-frame.router/fsm-trigger "#fd701e"
                                     nil)}}
               [:td {:style (merge row-style {:cursor "pointer"})
                     :on-click (fn [e]
                                 (when (:showing @trace-detail-expansions)
                                   (swap! trace-detail-expansions assoc :showing false))
                                 (swap! trace-detail-expansions update-in [:overrides id] not))}
                (if (or (get-in @trace-detail-expansions [:overrides id])
                        (:showing @trace-detail-expansions))
                  "▼"
                  "▶")]
               [:td {:style row-style} (str op-type)]
