  :db/query-success
  [interceptors]
  (fn [db [_ v]]
-   (timbre/debug "merging " v)
    (deep-merge* db v)))
 
 (defn with-path [db path]

        (fn [id]
          (js/clearTimeout (@timeouts id))
          (swap! timeouts dissoc id)))

(defonce !chsk-send! (atom nil))
(defonce !chsk-state (atom nil))

(reg-event-fx
 :chsk/state
 [interceptors]
 (fn [{:keys [db]} [_ [old new]]]
   (when (:first-open? new)
     {:dispatch-n [[:macro/get]
                   [:beeminder/get]
                   [:goal/get]
                   [:slack/get]]})))

(reg-event-fx
 :chsk/recv
