 
 (enable-console-print!)
 
-(declare +router+)
+(def +router+ nil)
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;; Events

(defn update-location
  [{:keys [handler route-params] :as params}]
  (reify
    IPrintWithWriter
    (-pr-writer [mv writer x]
      (-write writer "#<event:router/update-location ")
      (-pr-writer params writer x)
      (-write writer ">"))

    rs/UpdateEvent
    (-apply-update [_ state]
      (merge state

                              ["icons" :dashboard/icons]
                              ["colors" :dashboard/colors]]]
               ["workspace/" [[page-route :workspace/page]]]]])

(defn init
  []
