diff --git a/tests/ChatTests/Groups.hs b/tests/ChatTests/Groups.hs index 1f264c9932..2f5d6ffb7d 100644 --- a/tests/ChatTests/Groups.hs +++ b/tests/ChatTests/Groups.hs @@ -263,7 +263,7 @@ chatGroupTests = do -- TODO - cancellation on failure to create relay group (for owner) -- TODO - async retry connecting to relay (for members) -- TODO - test relay privileges - sequential $ describe "channels" $ do + describe "channels" $ do describe "relay delivery" $ do describe "single relay" $ do it "should deliver messages to members" testChannels1RelayDeliver diff --git a/tests/ChatTests/Utils.hs b/tests/ChatTests/Utils.hs index 59e4bc37dc..fa022698d0 100644 --- a/tests/ChatTests/Utils.hs +++ b/tests/ChatTests/Utils.hs @@ -350,7 +350,7 @@ itemId i = show $ length chatFeatures + i (@@@) :: HasCallStack => TestCC -> [(String, String)] -> Expectation (@@@) cc res = do - threadDelay 500000 + threadDelay 100000 getChats mapChats cc res mapChats :: [(String, String, Maybe ConnStatus)] -> [(String, String)]