Comment change

This commit is contained in:
Mike Thompson 2016-07-28 15:55:02 +10:00
parent e2034f4576
commit c250bbbc9d
1 changed files with 3 additions and 4 deletions

View File

@ -92,12 +92,11 @@
(let [event-id (first-in-vector event-v) (let [event-id (first-in-vector event-v)
handler-fn (lookup-handler event-id)] handler-fn (lookup-handler event-id)]
(if (nil? handler-fn) (if (nil? handler-fn)
(console :error "re-frame: no event handler registered for: \"" event-id (console :error "re-frame: no event handler registered for: \"" event-id "\". Ignoring.")
"\". Ignoring.") (if *handling*
(if *handling*
(console :error "re-frame: while handling \"" *handling* (console :error "re-frame: while handling \"" *handling*
"\" dispatch-sync was called for \"" event-v "\" dispatch-sync was called for \"" event-v
"\". You can't call dispatch-sync in an event handler.") "\". You can't call dispatch-sync within an event handler.")
(binding [*handling* event-v] (binding [*handling* event-v]
(let [stack (some-> event-v (let [stack (some-> event-v
meta meta