mirror of
https://github.com/penpot/penpot.git
synced 2026-05-17 22:13:39 +00:00
23 lines
498 B
Clojure
23 lines
498 B
Clojure
(ns uxbox.state
|
|
(:require [uxbox.rstore :as rs]
|
|
[beicon.core :as rx]))
|
|
|
|
(enable-console-print!)
|
|
|
|
(defonce state (atom {}))
|
|
|
|
(defonce stream
|
|
(rs/init {:user {:fullname "Cirilla"
|
|
:avatar "http://lorempixel.com/50/50/"}
|
|
:workspace nil
|
|
:projects []
|
|
:pages []
|
|
:projects-by-id {}
|
|
:pages-by-id {}}))
|
|
|
|
(defonce +setup-stuff+
|
|
(do
|
|
(rx/to-atom stream state)
|
|
(rx/on-value stream #(println "state:" %))))
|
|
|