penpot/frontend/uxbox/state.cljs

18 lines
486 B
Clojure

(ns uxbox.state
(:require [uxbox.rstore :as rs]
[beicon.core :as rx]))
(defonce stream
(rs/init {:location :auth/login
:location-params nil
:projects-by-id {}
:pages-by-id {}}))
(defonce state (atom {}))
(rx/to-atom stream state)
;; (rs/emit! (rs/reset-state {:location :auth/login
;; :location-params nil
;; :projects-by-id {}
;; :pages-by-id {}}))