From 799963b9d38fb9f080e6eb16dc7d617eb8b9b85c Mon Sep 17 00:00:00 2001
From: Evgeny Poberezkin <2769109+epoberezkin@users.noreply.github.com>
Date: Mon, 22 Aug 2022 22:42:46 +0100
Subject: [PATCH] remove print

---
 src/Simplex/Messaging/Server.hs | 1 -
 1 file changed, 1 deletion(-)

diff --git a/src/Simplex/Messaging/Server.hs b/src/Simplex/Messaging/Server.hs
index ad561a489..1b1f08c40 100644
--- a/src/Simplex/Messaging/Server.hs
+++ b/src/Simplex/Messaging/Server.hs
@@ -434,7 +434,6 @@ client clnt@Client {thVersion, subscriptions, ntfSubscriptions, rcvQ, sndQ} Serv
           quota <- asks $ msgQueueQuota . config
           let queueLen _ = fmap fromIntegral . queueLength =<< getMsgQueue ms queueId quota
           len <- atomically (suspendQueue st queueId >>= mapM queueLen)
-          liftIO $ putStrLn $ "suspendQueue_ " <> show len
           pure (corrId, queueId, either ERR LEN len)
 
         subscribeQueue :: QueueRec -> RecipientId -> m (Transmission BrokerMsg)