From 4a5e27e641b22abf3d86787f28a64432c7c7c836 Mon Sep 17 00:00:00 2001
From: Andrey Antukh <niwi@niwi.nz>
Date: Mon, 21 Dec 2020 09:47:50 +0100
Subject: [PATCH] :arrow_up: Update potok to 3.0.0.

---
 frontend/deps.edn                |  4 ++--
 frontend/src/app/main/store.cljs | 14 ++++++--------
 2 files changed, 8 insertions(+), 10 deletions(-)

diff --git a/frontend/deps.edn b/frontend/deps.edn
index 2e79e6972..81199815b 100644
--- a/frontend/deps.edn
+++ b/frontend/deps.edn
@@ -11,10 +11,10 @@
   danlentz/clj-uuid {:mvn/version "0.1.9"}
   frankiesardo/linked {:mvn/version "1.3.0"}
 
-  funcool/beicon {:mvn/version "2020.05.08-2"}
+  funcool/beicon {:mvn/version "2020.12.20-1"}
   funcool/cuerdas {:mvn/version "2020.03.26-3"}
   funcool/okulary {:mvn/version "2020.04.14-0"}
-  funcool/potok {:mvn/version "2020.08.10-2"}
+  funcool/potok {:mvn/version "3.0.0"}
   funcool/promesa {:mvn/version "6.0.0"}
   funcool/rumext {:mvn/version "2020.11.27-0"}
 
diff --git a/frontend/src/app/main/store.cljs b/frontend/src/app/main/store.cljs
index db46995ad..2fa920a3b 100644
--- a/frontend/src/app/main/store.cljs
+++ b/frontend/src/app/main/store.cljs
@@ -21,10 +21,9 @@
 
 (def ^:dynamic *on-error* identity)
 
-(defonce state  (l/atom {}))
 (defonce loader (l/atom false))
-(defonce store  (ptk/store {:resolve ptk/resolve}))
-(defonce stream (ptk/input-stream store))
+(defonce state  (ptk/store {:resolve ptk/resolve}))
+(defonce stream (ptk/input-stream state))
 
 (defn- repr-event
   [event]
@@ -49,15 +48,15 @@
 (defn emit!
   ([] nil)
   ([event]
-   (ptk/emit! store event)
+   (ptk/emit! state event)
    nil)
   ([event & events]
-   (apply ptk/emit! store (cons event events))
+   (apply ptk/emit! state (cons event events))
    nil))
 
 (defn emitf
   [& events]
-  #(apply ptk/emit! store events))
+  #(apply ptk/emit! state events))
 
 (def initial-state
   {:session-id (uuid/next)
@@ -67,8 +66,7 @@
   "Initialize the state materialization."
   ([] (init {}))
   ([props]
-   (emit! #(merge % initial-state props))
-   (rx/to-atom store state)))
+   (emit! #(merge % initial-state props))))
 
 (defn ^:export dump-state []
   (logjs "state" @state))