diff --git a/src/Converge.hs b/src/Converge.hs index 9db2148..3b22ba2 100644 --- a/src/Converge.hs +++ b/src/Converge.hs @@ -585,7 +585,7 @@ connectRelay :: Text -> Logger -> [RepoConfig] -> IO () connectRelay url logger repos = do logMsg logger Info ("relay: connecting to " <> url) req <- parseRequest (T.unpack url) - manager <- newManager tlsManagerSettings + manager <- newManager tlsManagerSettings{managerResponseTimeout = responseTimeoutNone} let loop delay = do let delaySec = min delay (60 :: Int) result <- try $