From 411e6e4cff6522ea428860ba5db4342c0deb594f Mon Sep 17 00:00:00 2001
From: Andrey Antukh <niwi@niwi.nz>
Date: Sun, 21 Feb 2016 20:30:59 +0200
Subject: [PATCH] Minor changes on router.

---
 src/uxbox/router.cljs | 14 +-------------
 1 file changed, 1 insertion(+), 13 deletions(-)

diff --git a/src/uxbox/router.cljs b/src/uxbox/router.cljs
index 3df27fa8d7..05987d4f57 100644
--- a/src/uxbox/router.cljs
+++ b/src/uxbox/router.cljs
@@ -6,7 +6,7 @@
 
 (enable-console-print!)
 
-(declare +router+)
+(def +router+ nil)
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;; Events
@@ -15,12 +15,6 @@
 (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
@@ -33,10 +27,6 @@
   ([name params]
    {:pre [(keyword? name)]}
    (reify
-     IPrintWithWriter
-     (-pr-writer [mv writer _]
-       (-write writer "#<event:router/navigate>"))
-
      rs/EffectEvent
      (-apply-effect [_ state]
        (let [loc (merge {:handler name}
@@ -61,8 +51,6 @@
                               ["colors" :dashboard/colors]]]
                ["workspace/" [[page-route :workspace/page]]]]])
 
-(def ^:static ^:private +router+ nil)
-
 (defn init
   []
   (let [opts {:on-navigate #(rs/emit! (update-location %))