diff --git a/src/Simplex/Chat.hs b/src/Simplex/Chat.hs index 4dc9dabed1..e2b0a977fd 100644 --- a/src/Simplex/Chat.hs +++ b/src/Simplex/Chat.hs @@ -3685,7 +3685,7 @@ processAgentMessageNoConn = \case where connIds = map AgentConnId conns notifyAPI = toView . CRNetworkStatus nsStatus - notifyCLI = do + notifyCLI = whenM (asks $ subscriptionEvents . config) $ do cs <- withStore' (`getConnectionsContacts` conns) toView $ event srv cs