Skip to content

Commit 6d867cd

Browse files
Remove debug prints
Co-authored-by: Marko Dimjašević <[email protected]>
1 parent 9e63618 commit 6d867cd

File tree

1 file changed

+0
-5
lines changed

1 file changed

+0
-5
lines changed

services/galley/test/integration/API/Federation.hs

Lines changed: 0 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -82,9 +82,6 @@ getConversationsAllFound = do
8282
carlQ <- Qualified <$> randomUser <*> pure localDomain
8383
connectUsers bob (singleton (qUnqualified carlQ))
8484

85-
putStrLn $ "alice: " <> show (qUnqualified aliceQ)
86-
putStrLn $ "bob: " <> show bob
87-
putStrLn $ "carl: " <> show (qUnqualified carlQ)
8885

8986
cnv2 <-
9087
responseJsonError
@@ -117,8 +114,6 @@ getConversationsAllFound = do
117114
"self member role mismatch"
118115
(Just . memConvRoleName . cmSelf $ cnvMembers cnv2)
119116
(rcmSelfRole . rcnvMembers <$> c2)
120-
putStrLn $ "actual members " <> show (fmap (rcmOthers . rcnvMembers) c2)
121-
putStrLn $ "expected members " <> show (cmOthers (cnvMembers cnv2))
122117
assertEqual
123118
"other members mismatch"
124119
(Just (sort [bob, qUnqualified carlQ]))

0 commit comments

Comments
 (0)