added msg-id to protocol event
This commit is contained in:
parent
5d3d511905
commit
a3353e2168
|
@ -61,7 +61,7 @@
|
||||||
:group-new-participant [identity group-id from msg-id]
|
:group-new-participant [identity group-id from msg-id]
|
||||||
:group-removed-participant [from identity group-id msg-id]
|
:group-removed-participant [from identity group-id msg-id]
|
||||||
:removed-from-group [from group-id msg-id]
|
:removed-from-group [from group-id msg-id]
|
||||||
:participant-left-group [from group-id]
|
:participant-left-group [from group-id msg-id]
|
||||||
:initialized [identity]
|
:initialized [identity]
|
||||||
|
|
||||||
:new-msg, new-group-msg, msg-acked should be handled idempotently (may be called multiple times for the same msg-id)
|
:new-msg, new-group-msg, msg-acked should be handled idempotently (may be called multiple times for the same msg-id)
|
||||||
|
|
|
@ -130,7 +130,8 @@
|
||||||
(when (group-member? store group-topic from)
|
(when (group-member? store group-topic from)
|
||||||
(remove-identity store group-topic from)
|
(remove-identity store group-topic from)
|
||||||
(invoke-user-handler :participant-left-group {:group-id group-topic
|
(invoke-user-handler :participant-left-group {:group-id group-topic
|
||||||
:from from}))))
|
:from from
|
||||||
|
:msg-id msg-id}))))
|
||||||
|
|
||||||
(defn handle-group-msg [web3 msg-type from {:keys [enc-payload group-topic]}]
|
(defn handle-group-msg [web3 msg-type from {:keys [enc-payload group-topic]}]
|
||||||
(if-let [payload (decrypt-group-msg group-topic enc-payload)]
|
(if-let [payload (decrypt-group-msg group-topic enc-payload)]
|
||||||
|
|
Loading…
Reference in New Issue