From c899a39cf3a947c88822293a6bcf5dc1791db46f Mon Sep 17 00:00:00 2001
From: "Evgeny @ SimpleX Chat"
 <259188159+evgeny-simplex@users.noreply.github.com>
Date: Tue, 4 Aug 2026 12:50:50 +0000
Subject: [PATCH] update test

---
 tests/ChatTests/Groups.hs | 23 ++++++++++++++++++++++-
 1 file changed, 22 insertions(+), 1 deletion(-)

diff --git a/tests/ChatTests/Groups.hs b/tests/ChatTests/Groups.hs
index 04825d969f..19fcbeeff0 100644
--- a/tests/ChatTests/Groups.hs
+++ b/tests/ChatTests/Groups.hs
@@ -2327,7 +2327,7 @@ testGroupSharedBatchBodyMixedModes :: HasCallStack => TestParams -> IO ()
 testGroupSharedBatchBodyMixedModes ps =
   withNewTestChat ps "alice" aliceProfile $ \alice ->
     withNewTestChat ps "bob" bobProfile $ \bob ->
-      withNewTestChat ps "cath" cathProfile $ \cath ->
+      withNewTestChat ps "cath" cathProfile $ \cath -> do
         withNewTestChatCfg ps oldCfg "dan" danProfile $ \dan ->
           withNewTestChatCfg ps oldCfg "eve" eveProfile $ \eve -> do
             alice ##> "/g team"
@@ -2426,6 +2426,27 @@ testGroupSharedBatchBodyMixedModes ps =
             eve ##> "/_get chat #1 count=100"
             re <- chat <$> getTermLine eve
             re `shouldContain` [(0, "updated profile")]
+            dan #> "#team hello from dan"
+            [alice, bob, cath, eve] *<# "#team dan> hello from dan"
+        withTestChat ps "dan" $ \dan ->
+          withTestChat ps "eve" $ \eve -> do
+            dan <## "subscribed 4 connections on server localhost"
+            eve <## "subscribed 4 connections on server localhost"
+            dan #> "#team d1"
+            [alice, bob, cath, eve] *<# "#team dan> d1"
+            dan #> "#team d2"
+            [alice, bob, cath, eve] *<# "#team dan> d2"
+            eve #> "#team e1"
+            [alice, bob, cath, dan] *<# "#team eve> e1"
+            eve #> "#team e2"
+            [alice, bob, cath, dan] *<# "#team eve> e2"
+            dan ##> "/p dan2"
+            dan <## "user profile is changed to dan2 (your 0 contacts are notified)"
+            dan #> "#team d3"
+            [alice, bob, cath, eve] *<# "#team dan2> d3"
+            eve ##> "/_get chat #1 count=100"
+            re2 <- chat <$> getTermLine eve
+            re2 `shouldContain` [(0, "updated profile (signed)")]
   where
     oldCfg = testCfg {chatVRange = mkVersionRange (VersionChat 9) (VersionChat 17)}