Skip to content

Commit

Permalink
Trivial re-alignment in integration tests with the prod changes.
Browse files Browse the repository at this point in the history
  • Loading branch information
fisx committed Jan 8, 2024
1 parent 1123ca2 commit b6419f4
Show file tree
Hide file tree
Showing 2 changed files with 5 additions and 7 deletions.
8 changes: 3 additions & 5 deletions services/galley/test/integration/API/Teams/LegalHold.hs
Original file line number Diff line number Diff line change
Expand Up @@ -705,10 +705,8 @@ testOldClientsBlockDeviceHandshake = do
-- this specifically checks the place that handles otr messages and responds with status
-- 412 and a list of missing clients.
--
-- if any of those clients are LH, this test provodes a "missing-legalhold-consent" error
-- instead, without any information about the LH clients. the condition is actually "has
-- old device or has not granted consent", but the latter part is blocked earlier in 1:1 and
-- group conversations, and hard to test at the device level.)
-- if any of those clients are LH, this test provides a "missing-legalhold-consent-old-clients" error
-- instead, without any information about the LH clients.
--
-- tracked here: https://wearezeta.atlassian.net/browse/SQSERVICES-454

Expand Down Expand Up @@ -780,7 +778,7 @@ testOldClientsBlockDeviceHandshake = do
-- If user has a client without the ClientSupportsLegalholdImplicitConsent
-- capability then message sending is prevented to legalhold devices.
peerClient <- randomClient peer (someLastPrekeys !! 2)
runit peer peerClient >>= errWith 403 (\err -> Error.label err == "missing-legalhold-consent")
runit peer peerClient >>= errWith 403 (\err -> Error.label err == "missing-legalhold-consent-old-clients")
upgradeClientToLH peer peerClient
runit peer peerClient >>= errWith 412 (\(_ :: Msg.ClientMismatch) -> True)

Expand Down
Original file line number Diff line number Diff line change
Expand Up @@ -629,7 +629,7 @@ testOldClientsBlockDeviceHandshake = do
-- this specifically checks the place that handles otr messages and responds with status
-- 412 and a list of missing clients.
--
-- if any of those clients are LH, this test provodes a "missing-legalhold-consent" error
-- if any of those clients are LH, this test provodes a "missing-legalhold-consent-old-clients" error
-- instead, without any information about the LH clients. the condition is actually "has
-- old device or has not granted consent", but the latter part is blocked earlier in 1:1 and
-- group conversations, and hard to test at the device level.)
Expand Down Expand Up @@ -705,7 +705,7 @@ testOldClientsBlockDeviceHandshake = do
-- If user has a client without the ClientSupportsLegalholdImplicitConsent
-- capability then message sending is prevented to legalhold devices.
peerClient <- randomClient peer (someLastPrekeys !! 2)
runit peer peerClient >>= errWith 403 (\err -> Error.label err == "missing-legalhold-consent")
runit peer peerClient >>= errWith 403 (\err -> Error.label err == "missing-legalhold-consent-old-clients")
upgradeClientToLH peer peerClient
runit peer peerClient >>= errWith 412 (\(_ :: Msg.ClientMismatch) -> True)

Expand Down

0 comments on commit b6419f4

Please sign in to comment.