blade/simplex-chat
1
0
Fork 0
mirror of https://github.com/simplex-chat/simplex-chat.git synced 2024-12-17 17:20:21 +01:00
Code Issues Actions Packages Projects Releases Wiki Activity

core: exclude contacts accepted via group link from chat previews (#1234)

Browse Source 
* RGEInvitedViaGroupLink

* CRSentGroupInvitationViaLink

* via_group_link filtering

* reset

* refactor

* remove brackets
This commit is contained in:
JRoberts
2022-10-21 17:35:07 +04:00
committed by GitHub
parent 7f9c4ede02
commit 5bcb725ea5
9 changed files with 69 additions and 28 deletions
Download Patch File Download Diff File Expand all files Collapse all files
tests/ChatTests.hs
+7 -4
View File
@@ -3287,13 +3287,16 @@ testGroupLink =
concurrentlyN_
[ do
alice <## "bob (Bob): contact is connected"
alice <## "invitation to join the group #team sent to bob",
alice <## "bob invited to group #team via your group link",
do
bob <## "alice (Alice): contact is connected"
bob <## "#team: alice invites you to join the group as member"
bob <## "use /j team to accept"
]
alice #$> ("/_get chat #1 count=100", chat, [(0, "invited via your group link")])
alice @@@ [("#team", "invited via your group link")] -- contacts connected via group link are not in chat previews
alice <##> bob
alice @@@ [("@bob", "hey"), ("#team", "invited via your group link")]
bob ##> "/j team"
concurrently_
(alice <## "#team: bob joined the group")
@@ -3318,7 +3321,7 @@ testGroupLink =
concurrentlyN_
[ do
alice <## "cath_1 (Catherine): contact is connected"
alice <## "invitation to join the group #team sent to cath_1",
alice <## "cath_1 invited to group #team via your group link",
do
cath <## "alice_1 (Alice): contact is connected"
cath <## "#team: alice_1 invites you to join the group as member"
@@ -3404,7 +3407,7 @@ testGroupLinkIncognitoMembership =
[ do
bob <## ("cath (Catherine): contact is connected, your incognito profile for this contact is " <> bobIncognito)
bob <## "use /info cath to print out this incognito profile again"
bob <## "invitation to join the group #team sent to cath",
bob <## "cath invited to group #team via your group link",
do
cath <## (bobIncognito <> ": contact is connected")
cath <## ("#team: " <> bobIncognito <> " invites you to join the group as member")
@@ -3436,7 +3439,7 @@ testGroupLinkIncognitoMembership =
[ do
bob <## (danIncognito <> ": contact is connected, your incognito profile for this contact is " <> bobIncognito)
bob <## ("use /info " <> danIncognito <> " to print out this incognito profile again")
bob <## ("invitation to join the group #team sent to " <> danIncognito),
bob <## (danIncognito <> " invited to group #team via your group link"),
do
dan <## (bobIncognito <> ": contact is connected, your incognito profile for this contact is " <> danIncognito)
dan <## ("use /info " <> bobIncognito <> " to print out this incognito profile again")