dandri/simplex-chat
1
0
Fork 0
mirror of https://github.com/simplex-chat/simplex-chat.git synced 2026-07-28 20:49:50 +00:00
Code Issues Packages Projects Releases Wiki Activity

core: don't create member announcement chat item in channels (#6744)

Browse Source
This commit is contained in:
spaced4ndy
2026-04-03 16:31:31 +00:00
committed by GitHub
parent fb9187ca03
commit b690f89a99
1 changed files with 4 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/Simplex/Chat/Library/Subscriber.hs
+4 -3
View File
@@ -2860,9 +2860,10 @@ processAgentMessageConn vr user@User {userId} corrId agentConnId agentMessage =
| otherwise = Just DJSGroup {jobSpec = DJDeliveryJob {includePending = False}}
memberAnnouncedToView announcedMember@GroupMember {groupMemberId, memberProfile} gInfo' = do
(announcedMember', scopeInfo) <- getMemNewChatScope announcedMember
let event = RGEMemberAdded groupMemberId (fromLocalProfile memberProfile)
(ci, cInfo) <- saveRcvChatItemNoParse user (CDGroupRcv gInfo' scopeInfo m) msg brokerTs (CIRcvGroupEvent event)
groupMsgToView cInfo ci
unless (useRelays' gInfo') $ do
let event = RGEMemberAdded groupMemberId (fromLocalProfile memberProfile)
(ci, cInfo) <- saveRcvChatItemNoParse user (CDGroupRcv gInfo' scopeInfo m) msg brokerTs (CIRcvGroupEvent event)
groupMsgToView cInfo ci
case scopeInfo of
Just (GCSIMemberSupport _) -> do
createInternalChatItem user (CDGroupRcv gInfo' scopeInfo m) (CIRcvGroupEvent RGENewMemberPendingReview) (Just brokerTs)