Adds simple task register / unregister effects

jtkDvlp · Sep 30, 2022 · b37c2b6 · b37c2b6
1 parent 9826c4f
commit b37c2b6
Showing 1 changed file with 13 additions and 0 deletions.
diff --git a/src/jtk_dvlp/re_frame/tasks.cljs b/src/jtk_dvlp/re_frame/tasks.cljs
@@ -223,6  223,19 @@
             (handle-straight-variant context task fxs))))))))
 
 
 ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;; Effects
 
 (rf/reg-fx ::register
   (fn [name-or-task]
     (let [task (normalize-task name-or-task)]
       (rf/dispatch-sync [::register task]))))
 
 (rf/reg-fx ::unregister
   (fn [task]
     (rf/dispatch [::unregister task])))
 
 
 ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;; Events