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

WIP

Browse source
This commit is contained in:
Andrey Antukh 2015-12-13 13:04:34 +02:00
parent 113f5fcd16
commit 68b5f9c2ea
6 changed files with 291 additions and 24 deletions
Download patch file Download diff file Expand all files Collapse all files

10
frontend/uxbox/ui.cljs
View file

@ -3,7 +3,8 @@
[cats.labs.lens :as l]
[uxbox.state :as s]
[uxbox.util :as util]
[uxbox.ui.users :as u]))
[uxbox.ui.users :as ui.u]
[uxbox.ui.dashboard :as ui.d]))
(def ^:private ^:static state
(as-> (l/select-keys [:location]) $
@ -11,15 +12,16 @@
(defn app-render
[own]
(println "KAKA: " @state)
(let [{:keys [location location-params]} (rum/react state)]
(println @state)
(case location
:auth/login (u/login)
:auth/login (ui.u/login)
;; :auth/register (u/register)
;; :auth/recover (u/recover-password)
;; :main/dashboard (d/dashboard)
:main/dashboard (ui.d/dashboard)
;; :main/project (w/workspace conn location-params)
;; :main/page (w/workspace conn location-params))))
nil
)))
(def app