tlsManagerSettings defaults to a 30s response timeout, which kills long-lived SSE connections between push events. Set it to responseTimeoutNone so the relay watcher waits indefinitely.
This commit is contained in:
+1
-1
@@ -585,7 +585,7 @@ connectRelay :: Text -> Logger -> [RepoConfig] -> IO ()
|
|||||||
connectRelay url logger repos = do
|
connectRelay url logger repos = do
|
||||||
logMsg logger Info ("relay: connecting to " <> url)
|
logMsg logger Info ("relay: connecting to " <> url)
|
||||||
req <- parseRequest (T.unpack url)
|
req <- parseRequest (T.unpack url)
|
||||||
manager <- newManager tlsManagerSettings
|
manager <- newManager tlsManagerSettings{managerResponseTimeout = responseTimeoutNone}
|
||||||
let loop delay = do
|
let loop delay = do
|
||||||
let delaySec = min delay (60 :: Int)
|
let delaySec = min delay (60 :: Int)
|
||||||
result <- try $
|
result <- try $
|
||||||
|
|||||||
Reference in New Issue
Block a user