3pp-mirror/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2025-06-08 08:21:38 +02:00
Code Issues Projects Releases Packages Wiki Activity

✨ Improve (and fix many bugs) routing handling.

Browse source
This commit is contained in:
Andrey Antukh 2020-05-11 08:10:36 +02:00 • committed by Alonso Torres
parent 1e6ed35c77
commit d9c459e877
3 changed files with 32 additions and 26 deletions
Download patch file Download diff file Expand all files Collapse all files

29
frontend/src/uxbox/main.cljs
View file

@ -13,6 +13,7 @@
[beicon.core :as rx]
[goog.object :as gobj]
[rumext.alpha :as mf]
[uxbox.common.uuid :as uuid]
[uxbox.main.data.auth :refer [logout]]
[uxbox.main.data.users :as udu]
[uxbox.main.store :as st]
@ -23,6 +24,7 @@
[uxbox.util.i18n :as i18n]
[uxbox.util.theme :as theme]
[uxbox.util.router :as rt]
[uxbox.util.object :as obj]
[uxbox.util.storage :refer [storage]]
[uxbox.util.timers :as ts]))
@ -31,35 +33,38 @@
(defn on-navigate
[router path]
(let [match (rt/match router path)
profile (:profile storage)]
profile (:profile storage)
authed? (and (not (nil? profile))
(not= (:id profile) uuid/zero))]
(cond
(and (= path "") (not profile))
(rt/nav :login)
(and (or (= path "")
(nil? match))
(not authed?))
(st/emit! (rt/nav :login))
(and (= path "") authed?)
(st/emit! (rt/nav :dashboard-team {:team-id (:default-team-id profile)}))
(and (= path "") profile)
(rt/nav :dashboard-team {:team-id (:default-team-id profile)})
(nil? match)
(rt/nav :not-found)
(st/emit! (rt/nav :not-found))
:else
#(assoc % :route match))))
(st/emit! #(assoc % :route match)))))
(defn init-ui
[]
(st/emit! (rt/initialize-router ui/routes)
(rt/initialize-history on-navigate))
(when (:profile storage)
(st/emit! udu/fetch-profile))
(st/emit! udu/fetch-profile)
(mf/mount (mf/element ui/app) (dom/get-element "app"))
(mf/mount (mf/element modal) (dom/get-element "modal")))
(defn ^:export init
[]
(let [translations (gobj/get goog.global "uxboxTranslations")
themes (gobj/get goog.global "uxboxThemes")]
(let [translations (obj/get js/window "uxboxTranslations")
themes (gobj/get js/window "uxboxThemes")]
(i18n/init! translations)
(theme/init! themes)
(st/init)