From 3fbcd4b8ef31536721aa7671e4998c57cd9cff02 Mon Sep 17 00:00:00 2001
From: spaced4ndy <8711996+spaced4ndy@users.noreply.github.com>
Date: Thu, 28 May 2026 13:59:06 +0400
Subject: [PATCH] wip

---
 src/Simplex/Chat/Library/Subscriber.hs | 12 +++++-------
 1 file changed, 5 insertions(+), 7 deletions(-)

diff --git a/src/Simplex/Chat/Library/Subscriber.hs b/src/Simplex/Chat/Library/Subscriber.hs
index 07d19c9621..fbbcb55e73 100644
--- a/src/Simplex/Chat/Library/Subscriber.hs
+++ b/src/Simplex/Chat/Library/Subscriber.hs
@@ -2975,7 +2975,11 @@ processAgentMessageConn vr user@User {userId} corrId agentConnId agentMessage =
                   if memberRole' unknownMember == memRole
                     then do
                       updatedMember <- withStore $ \db -> updateRosterMemberAnnounced db vr user m unknownMember memInfo initialStatus
-                      announceUnknownMember unknownMember updatedMember
+                      -- roster members can't be pending, so no members-require-attention update
+                      gInfo' <- updatePublicGroupData user gInfo
+                      toView $ CEvtUnknownMemberAnnounced user gInfo' m unknownMember updatedMember
+                      memberAnnouncedToView updatedMember gInfo'
+                      pure $ deliveryJobScope updatedMember
                     else messageError "x.grp.mem.new: privileged role not established by roster" $> Nothing
             Right unknownMember@GroupMember {memberStatus = GSMemUnknown} -> do
               (updatedMember, gInfo') <- withStore $ \db -> do
@@ -3007,12 +3011,6 @@ processAgentMessageConn vr user@User {userId} corrId agentConnId agentMessage =
                   memberAnnouncedToView newMember gInfo''
                   pure $ deliveryJobScope newMember
       where
-        -- roster members can't be pending, so no members-require-attention update
-        announceUnknownMember unknownMember updatedMember = do
-          gInfo'' <- updatePublicGroupData user gInfo
-          toView $ CEvtUnknownMemberAnnounced user gInfo'' m unknownMember updatedMember
-          memberAnnouncedToView updatedMember gInfo''
-          pure $ deliveryJobScope updatedMember
         initialStatus = case msgScope_ of
           Just (MSMember _) -> GSMemPendingReview
           _ -> GSMemAnnounced