don't trigger on-sent event if the delivered array is empty
This commit is contained in:
parent
36665bc123
commit
1eda612d0c
|
@ -116,7 +116,9 @@
|
||||||
(set! (.-channelSuccess handler)
|
(set! (.-channelSuccess handler)
|
||||||
(fn [ch delivered]
|
(fn [ch delivered]
|
||||||
(if on-sent
|
(if on-sent
|
||||||
(on-sent (decode-queued-map-array delivered)))
|
(let [decoded (decode-queued-map-array delivered)]
|
||||||
|
(if (seq decoded)
|
||||||
|
(on-sent decoded))))
|
||||||
(doseq [m delivered]
|
(doseq [m delivered]
|
||||||
(let [{:keys [on-success] :as context} (aget m "context")]
|
(let [{:keys [on-success] :as context} (aget m "context")]
|
||||||
(if on-success
|
(if on-success
|
||||||
|
|
Reference in a new issue