 ;; --- Navigation Multimethod Declarations ---
 
 (defmulti navigated-to
-  (fn [history-imp to args state] to))
+  (fn [history-imp navigation-point args state] navigation-point))
 
 (defmulti post-navigated-to!
-  (fn [history-imp to args previous-state current-state]
+  (fn [history-imp navigation-point args previous-state current-state]
     (put! (get-in current-state [:comms :ws]) [:unsubscribe-stale-channels])
-    to))
+    navigation-point))
 
 ;; --- Navigation Mutlimethod Implementations ---
 
 (defmethod navigated-to :default
-  [history-imp to args state]
-  (mlog "Unknown nav event: " (pr-str to))
+  [history-imp navigation-point args state]
+  (mlog "Unknown nav event: " (pr-str navigation-point))
   state)
 
 (defmethod post-navigated-to! :default
-  [history-imp to args previous-state current-state]
-  (mlog "No post-nav for: " to))
+  [history-imp navigation-point args previous-state current-state]
+  (mlog "No post-nav for: " navigation-point))
 
 (defmethod post-navigated-to! :navigate!
-  [history-imp to path previous-state current-state]
+  [history-imp navigation-point path previous-state current-state]
   (let [path (if (= \/ (first path))
                (subs path 1)
                path)]



(defmethod navigated-to :build-inspector
  [history-imp to [project-name build-num org repo] state]
  (-> state
      (assoc :navigation-data {:project project-name
                               :build-num build-num}

      state-utils/reset-current-build))

(defmethod post-navigated-to! :dashboard
  [history-imp navigation-point args previous-state current-state]
  (let [api-ch (get-in current-state [:comms :api])
        dashboard-data (:navigation-data current-state)]
    (api/get-projects api-ch)
