From c7f54439203e177b50bd0ef1ad1e9b60d2fb8412 Mon Sep 17 00:00:00 2001 From: Evgeny Poberezkin <2769109+epoberezkin@users.noreply.github.com> Date: Fri, 7 Apr 2023 11:01:33 +0100 Subject: [PATCH] fix --- src/Simplex/Chat.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Simplex/Chat.hs b/src/Simplex/Chat.hs index d7b729220..0caf8df13 100644 --- a/src/Simplex/Chat.hs +++ b/src/Simplex/Chat.hs @@ -1542,7 +1542,7 @@ processChatCommand = \case (Just contact, _) -> pure $ CRContactAlreadyExists user contact (_, xContactId_) -> procCmd $ do let groupLinkId = crClientData >>= decodeJSON >>= \(CRDataGroup gli) -> Just gli - when (isJust groupLinkId) $ throwChatError CEConnReqMessageProhibited + when (isJust groupLinkId && isJust mc_) $ throwChatError CEConnReqMessageProhibited let randomXContactId = XContactId <$> drgRandomBytes 16 xContactId <- maybe randomXContactId pure xContactId_ -- [incognito] generate profile to send