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

   :db/authenticated-user (ref-to-user user)})

(reg-event-fx
 :user-me-success
 [interceptors]
 (fn [{:keys [db]} [_ user]]
   {:db             (merge db (normalize-user-to-db user))
    :sente-connect  (:auth-token db)
    :dispatch-later [{:ms 2 :dispatch [:pings/receive
                                       (ref-to-user user)
                                       true
                                       []
                                       (partition-all 100 (:pings user))]}
                     {:ms 2 :dispatch [:macro/get]}
                     {:ms 2 :dispatch [:beeminder/get]}
                     {:ms 2 :dispatch [:goal/get]}
                     {:ms 2 :dispatch [:slack/get]}]}))


(defn register-query! [n]

 :db/query-success
 [interceptors]
 (fn [db [_ v]]
   (deep-merge* db v)))

(defn with-path [db path]
