Play/pause stubs ready

open-simulation-platform · Sep 4, 2018 · de7a94a · de7a94a
1 parent be9019a
commit de7a94a
Showing 1 changed file with 13 additions and 11 deletions.
diff --git a/client/src/cljs/cse_client/core.cljs b/client/src/cljs/cse_client/core.cljs
@@ -24,17 +24,19 @@
              (fn [{:keys [db]} [state]]
                {:db (assoc db :state state)}))
 
-(rf/reg-event-fx :play
-                 (fn [_ _]
-                   {:http-xhrio {:method          :get
-                                 :uri             "/play"
-                                 :response-format (ajax/json-response-format {:keywords? true})}}))
-
-(rf/reg-event-fx :pause
-                 (fn [_ _]
-                   {:http-xhrio {:method          :get
-                                 :uri             "/pause"
-                                 :response-format (ajax/json-response-format {:keywords? true})}}))
+(k/reg-chain :play
+             (fn [_ _]
+               {:http-xhrio {:method          :get
+                             :uri             "/play"
+                             :response-format (ajax/json-response-format {:keywords? true})}})
+             (fn [_ _]))
+
+(k/reg-chain :pause
+                   (fn [_ _]
+                     {:http-xhrio {:method          :get
+                                   :uri             "/pause"
+                                   :response-format (ajax/json-response-format {:keywords? true})}})
+                   (fn [_ _]))
 
 (rf/reg-sub :state :state)