mirror of
https://github.com/simplex-chat/simplex-chat.git
synced 2026-06-09 02:03:17 +00:00
ios: deliver notifications instantly when server has no more messages and better concurrency (#5872)
* core: return error and message absence when getting notifications * ios: do not wait for notification messages when server says "no" * do not postpone some notification events, comments * refactor * simplexmq (mapM) * simplexmq (release lock) * ios: inline, more aggressive GHC RTC settings for garbage collection * simplexmq * corrections Co-authored-by: spaced4ndy <8711996+spaced4ndy@users.noreply.github.com> * refactor ntf delivery * ios: 6.3.4 (build 274) * simplexmq (fix updating last ts) * improve notification for multiple messages * simplexmq --------- Co-authored-by: spaced4ndy <8711996+spaced4ndy@users.noreply.github.com>
This commit is contained in:
@@ -1304,7 +1304,7 @@ processChatCommand' vr = \case
|
||||
$>>= \user -> fmap (mkNtfConn user) . eitherToMaybe <$> runExceptT (getConnectionEntity db vr user agentConnId)
|
||||
APIGetConnNtfMessages connMsgs -> withUser $ \_ -> do
|
||||
msgs <- lift $ withAgent' (`getConnectionMessages` connMsgs)
|
||||
let ntfMsgs = L.map (receivedMsgInfo <$>) msgs
|
||||
let ntfMsgs = L.map receivedMsgInfo msgs
|
||||
pure $ CRConnNtfMessages ntfMsgs
|
||||
GetUserProtoServers (AProtocolType p) -> withUser $ \user -> withServerProtocol p $ do
|
||||
srvs <- withFastStore (`getUserServers` user)
|
||||
|
||||
Reference in New Issue
Block a user