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

Move router lense decaration to uxbox.ui ns.

Browse source
This commit is contained in:
Andrey Antukh 2016-05-15 23:05:05 +03:00
parent e0ba0fd41f
commit 6eb65bfe39
No known key found for this signature in database
GPG key ID: 4DFEBCB8316A8B95
2 changed files with 5 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

5
src/uxbox/router.cljs
View file

@ -10,17 +10,12 @@
[bidi.bidi :as bidi] [bidi.bidi :as bidi]
[goog.events :as events] [goog.events :as events]
[lentes.core :as l] [lentes.core :as l]
[uxbox.state :as s]
[uxbox.rstore :as rs])) [uxbox.rstore :as rs]))
(enable-console-print!) (enable-console-print!)
(defonce +router+ (volatile! nil)) (defonce +router+ (volatile! nil))
(def route-l
(as-> (l/in [:route]) $
(l/focus-atom $ s/state)))
;; --- Update Location (Event) ;; --- Update Location (Event)
(defrecord UpdateLocation [id params] (defrecord UpdateLocation [id params]

6
src/uxbox/ui.cljs
View file

@ -30,11 +30,15 @@
(def ^:const +unrestricted+ #{:auth/login}) (def ^:const +unrestricted+ #{:auth/login})
(def ^:const restricted? (complement +unrestricted+)) (def ^:const restricted? (complement +unrestricted+))
(def route-l
(as-> (l/key :route) $
(l/focus-atom $ st/state)))
;; --- Main App (Component) ;; --- Main App (Component)
(defn app-render (defn app-render
[own] [own]
(let [route (rum/react r/route-l) (let [route (rum/react route-l)
auth (rum/react st/auth-l) auth (rum/react st/auth-l)
location (:id route) location (:id route)
params (:params route)] params (:params route)]