status-im/re-frame
2
0
Fork 0
mirror of https://github.com/status-im/re-frame.git synced 2025-02-23 07:18:22 +00:00
Code Issues Projects Releases Wiki Activity

Fix #42

Browse Source
This commit is contained in:
mike-thompson-day8 2015-04-22 00:16:55 +10:00
parent 47153fe7e1
commit 6ed3ba1e1f
1 changed files with 7 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
src/re_frame/handlers.cljs
View File

@ -52,6 +52,9 @@
;; -- lookup and call -----------------------------------------------------------------------------
(def ^:dynamic *handling* nil) ;; remember what event we are currently handling
(defn handle
"Given an event vector, look up the handler, then call it.
By default, handlers are not assumed to be pure. They are called with
@ -65,5 +68,8 @@
handler-fn (lookup-handler event-id)]
(if (nil? handler-fn)
(warn "re-frame: no event handler registered for: \"" event-id "\". Ignoring.") ;; TODO: make exception
(handler-fn app-db event-v))))
(if *handling*
(warn "re-frame: in the middle of handling \"" *handling* "\" tried to handle \"" event-v "\"")
(binding [*handling* event-v]
(handler-fn app-db event-v))))))