From 1e4a3794007e88d6335ea56618b81e8745a17ea5 Mon Sep 17 00:00:00 2001
From: Andrey Antukh <niwi@niwi.nz>
Date: Sat, 30 Jul 2016 22:43:23 +0300
Subject: [PATCH] Properly open selected page on view app.

---
 src/uxbox/main/ui/workspace/header.cljs | 15 ++++++---------
 1 file changed, 6 insertions(+), 9 deletions(-)

diff --git a/src/uxbox/main/ui/workspace/header.cljs b/src/uxbox/main/ui/workspace/header.cljs
index 963a9ffdb0..e601514ba4 100644
--- a/src/uxbox/main/ui/workspace/header.cljs
+++ b/src/uxbox/main/ui/workspace/header.cljs
@@ -25,9 +25,7 @@
             [uxbox.main.geom.point :as gpt]
             [uxbox.util.math :as mth]))
 
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-;; Coordinates Debug
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+;; --- Coordinates Widget
 
 (defn- coordenates-render
   [own]
@@ -54,9 +52,7 @@
     :name "coordenates"
     :mixins [mx/reactive]}))
 
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
-;; Header
-;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+;; --- Header Component
 
 (defn on-download-clicked
   [event page]
@@ -71,9 +67,10 @@
 
 (defn on-view-clicked
   [event project page]
-  (let [url (str cfg/viewurl "#/" (:share-token project))]
-    (js/open url "new tab" "")
-    #_(set! (.-href js/location) url)))
+  (let [token (:share-token project)
+        index (:index page)
+        url (str cfg/viewurl "#/" token "/" index)]
+    (js/open url "new tab" "")))
 
 (defn header-render
   [own]