From 21d564b60955855f4b4e996727f294082aced082 Mon Sep 17 00:00:00 2001
From: Andrey Antukh <niwi@niwi.nz>
Date: Wed, 16 Dec 2015 11:55:24 +0200
Subject: [PATCH] WIP: fix dashboard navigation issues.

---
 frontend/uxbox/ui/navigation.cljs | 10 +++++-----
 frontend/uxbox/ui/workspace.cljs  |  2 +-
 2 files changed, 6 insertions(+), 6 deletions(-)

diff --git a/frontend/uxbox/ui/navigation.cljs b/frontend/uxbox/ui/navigation.cljs
index da214724a..02a7a5c9c 100644
--- a/frontend/uxbox/ui/navigation.cljs
+++ b/frontend/uxbox/ui/navigation.cljs
@@ -1,11 +1,11 @@
 (ns uxbox.ui.navigation
-  (:require [goog.events :as events]))
+  (:require [sablono.core :as html :refer-macros [html]]
+            [goog.events :as events]
+            [uxbox.ui.dom :as dom]))
 
 (defn link
   "Given an href and a component, return a link component that will navigate
   to the given URI withour reloading the page."
   [href component]
-  [:a
-   {:href href
-    :on-click #(do (.preventDefault %) (set-uri! href))}
-   component])
+  (html
+   [:a {:href (str "/#" href)} component]))
diff --git a/frontend/uxbox/ui/workspace.cljs b/frontend/uxbox/ui/workspace.cljs
index cb5c780c3..c8ff56d29 100644
--- a/frontend/uxbox/ui/workspace.cljs
+++ b/frontend/uxbox/ui/workspace.cljs
@@ -49,7 +49,7 @@
     (html
      [:header#workspace-bar.workspace-bar
       [:div.main-icon
-       (nav/link (r/route-for :dashboard) i/logo-icon)]
+       (nav/link (r/route-for :main/dashboard) i/logo-icon)]
       [:div.project-tree-btn
        {:on-click (constantly nil)}
        i/project-tree