IntenseFinance/simplex-chat
3
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

fix tests

Browse Source
This commit is contained in:
spaced4ndy 2023-12-24 20:23:09 +04:00
parent c3c66182f2
commit bb4293eb5e
1 changed files with 14 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
tests/ChatTests/Groups.hs
View File

@ -2692,14 +2692,18 @@ testGroupLinkNoContact =
[ do [ do
alice <## "cath (Catherine): accepting request to join group #team..." alice <## "cath (Catherine): accepting request to join group #team..."
alice <## "#team: cath joined the group", alice <## "#team: cath joined the group",
do cath
cath <## "#team: joining the group..." <### [ "#team: joining the group...",
cath <## "#team: you joined the group" "#team: you joined the group",
cath <## "#team: member bob (Bob) is connected", WithTime "#team alice> hello [>>]",
WithTime "#team bob> hi there [>>]",
"#team: member bob (Bob) is connected"
],
do do
bob <## "#team: alice added cath (Catherine) to the group (connecting...)" bob <## "#team: alice added cath (Catherine) to the group (connecting...)"
bob <## "#team: new member cath is connected" bob <## "#team: new member cath is connected"
] ]
cath #> "#team hey" cath #> "#team hey"
alice <# "#team cath> hey" alice <# "#team cath> hey"
bob <# "#team cath> hey" bob <# "#team cath> hey"
@ -2757,10 +2761,12 @@ testGroupLinkNoContactMemberRole =
[ do [ do
alice <## "cath (Catherine): accepting request to join group #team..." alice <## "cath (Catherine): accepting request to join group #team..."
alice <## "#team: cath joined the group", alice <## "#team: cath joined the group",
do cath
cath <## "#team: joining the group..." <### [ "#team: joining the group...",
cath <## "#team: you joined the group" "#team: you joined the group",
cath <## "#team: member bob (Bob) is connected", WithTime "#team bob> hey now [>>]",
"#team: member bob (Bob) is connected"
],
do do
bob <## "#team: alice added cath (Catherine) to the group (connecting...)" bob <## "#team: alice added cath (Catherine) to the group (connecting...)"
bob <## "#team: new member cath is connected" bob <## "#team: new member cath is connected"