diff --git a/src/Simplex/Messaging/Agent.hs b/src/Simplex/Messaging/Agent.hs index ce489d64d..898411ace 100644 --- a/src/Simplex/Messaging/Agent.hs +++ b/src/Simplex/Messaging/Agent.hs @@ -1400,6 +1400,7 @@ runSmpQueueMsgDelivery c@AgentClient {subQ} ConnData {connId} sq@SndQueue {userI when (serverHostError e) $ notify $ MWARN (unId msgId) e retrySndMsg RIFast | otherwise -> do + atomically $ incSMPServerStat c userId server sentOtherErrs 1 notifyDel msgId err where retrySndMsg riMode = do