@@ -270,6 +270,7 @@ serveConnection conn ii addr settings app = do
270 requestBody req $$ CL.sinkNull
270 requestBody req $$ CL.sinkNull
271 ResumableSource fromClient' _ <- getSource
271 ResumableSource fromClient' _ <- getSource
273 when keepAlive $ recvSendLoop istatus fromClient'
274 when keepAlive $ recvSendLoop istatus fromClient'
274 Just intercept -> do
275 Just intercept -> do
275 T.pause th
276 T.pause th