core: subscribe to all connections concurrently (#770)

This commit is contained in:
Evgeny Poberezkin
2022-07-02 10:13:06 +01:00
committed by GitHub
parent 3450420b80
commit 15a17f3c13
2 changed files with 13 additions and 12 deletions
+1 -1
View File
@@ -73,7 +73,7 @@ data ChatController = ChatController
activeTo :: TVar ActiveTo,
firstTime :: Bool,
smpAgent :: AgentClient,
agentAsync :: TVar (Maybe (Async ())),
agentAsync :: TVar (Maybe (Async (), Maybe (Async ()))),
chatStore :: SQLiteStore,
chatStoreChanged :: TVar Bool, -- if True, chat should be fully restarted
idsDrg :: TVar ChaChaDRG,