 
 (defmethod navigated-to :add-projects
   [history-imp to [project-id build-num] state]
-  (assoc state :navigation-point :add-projects))
+  (assoc state :navigation-point :add-projects :navigation-data {}))
 
 (defmethod post-navigated-to! :add-projects
   [history-imp to args previous-state current-state]

  [history-imp to {:keys [project-name subpage]} state]
  (-> state
      (assoc :navigation-point :project-settings)
      (assoc :project-settings-subpage subpage)
      (assoc :project-settings-project-name project-name)
      (#(if (state-utils/stale-current-project? % project-name)

  [history-imp to args state]
  (-> state
      (assoc :navigation-point :dashboard
             :navigation-data (select-keys args [:branch :repo :org]))
      state-utils/reset-current-build))

(defmethod post-navigated-to! :dashboard
  [history-imp to 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)
    (api/get-dashboard-builds dashboard-data api-ch))
  (set-page-title!))
