Skip to content

Commit

Permalink
fixup! Test: clean up debugging leftovers
Browse files Browse the repository at this point in the history
  • Loading branch information
mdimjasevic committed Apr 27, 2023
1 parent 0a99e47 commit d2475ce
Showing 1 changed file with 2 additions and 5 deletions.
7 changes: 2 additions & 5 deletions services/galley/test/integration/API.hs
Original file line number Diff line number Diff line change
Expand Up @@ -2744,14 +2744,11 @@ testDeleteTeamConversationWithUnavailableRemoteMembers = do
<|> (guardRPC "on-conversation-updated" *> throw (MockErrorResponse HTTP.status503 "Down for maintenance."))
<|> (guardRPC "delete-team-conversation" *> throw (MockErrorResponse HTTP.status503 "Down for maintenance."))
(_, received) <- withTempMockFederator' mock $ do
addResp <-
responseJsonError @_ @Event
=<< postQualifiedMembers alice (remoteBob :| []) qconvId
<!! const 200 === statusCode
postQualifiedMembers alice (remoteBob :| []) qconvId
!!! const 200 === statusCode

deleteTeamConv tid convId alice
!!! const 200 === statusCode
pure addResp
liftIO $ do
let convUpdates = mapMaybe (eitherToMaybe . parseFedRequest) received
convUpdate <- case filter ((== SomeConversationAction (sing @'ConversationDeleteTag) ()) . cuAction) convUpdates of
Expand Down

0 comments on commit d2475ce

Please sign in to comment.