blob: 4d644fd8afb9e9fa93b6160850c2dd430cc64104 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
|
(ns app.rpc
(:require-macros
[javelin.core :refer [defc defc=]])
(:require
[javelin.core]
[castra.core :refer [mkremote]]))
(defc state nil)
(defc error nil)
(defc loading nil)
(def get-state
(mkremote 'app.api/get-state state error loading))
(def turn-on
(mkremote 'app.api/turn-on state error loading))
(def turn-off
(mkremote 'app.api/turn-off state error loading))
(def set-name
(mkremote 'app.api/set-name state error loading))
(defn init []
(get-state)
(js/setInterval get-state 1000))
|
