From 89e7729f2c710dfcf96e48998ccc1915e58b960f Mon Sep 17 00:00:00 2001
From: James Brechtel <git@jamesbrechtel.com>
Date: Thu, 14 May 2026 18:10:02 -0400
Subject: [PATCH] converge: disable response timeout on relay SSE connection

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.
---
 src/Converge.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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 $