From a7b39b710c3aab9b2a38bd6841e52e0342b3a7ef Mon Sep 17 00:00:00 2001
From: Evgeny Poberezkin <2769109+epoberezkin@users.noreply.github.com>
Date: Sat, 20 Aug 2022 13:26:25 +0100
Subject: [PATCH] fix toggleConnectionNtfs (#503)

---
 src/Simplex/Messaging/Agent.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/Simplex/Messaging/Agent.hs b/src/Simplex/Messaging/Agent.hs
index cb54c50dc..7cff667d5 100644
--- a/src/Simplex/Messaging/Agent.hs
+++ b/src/Simplex/Messaging/Agent.hs
@@ -878,7 +878,7 @@ toggleConnectionNtfs' c connId enable = do
         withStore' c $ \db -> setConnectionNtfs db connId enable
         ns <- asks ntfSupervisor
         let cmd = if enable then NSCCreate else NSCDelete
-        atomically $ writeTBQueue (ntfSubQ ns) (connId, cmd)
+        atomically $ sendNtfSubCommand ns (connId, cmd)
 
 deleteToken_ :: AgentMonad m => AgentClient -> NtfToken -> m ()
 deleteToken_ c tkn@NtfToken {ntfTokenId, ntfTknStatus} = do