on master help sign in
Resume timeout handlers between requests #231
322515dMichael Snoyman
warp/Network/Wai/Handler/Warp/Run.hs+1
@@ -268,6 +268,7 @@ serveConnection conn ii addr settings app = do
268 requestBody req $$ CL.sinkNull
268 requestBody req $$ CL.sinkNull
269 ResumableSource fromClient' _ <- getSource
269 ResumableSource fromClient' _ <- getSource
270
270
271+ T.resume th
271 when keepAlive $ recvSendLoop istatus fromClient'
272 when keepAlive $ recvSendLoop istatus fromClient'
272 Just intercept -> do
273 Just intercept -> do
273 T.pause th
274 T.pause th
warp/warp.cabal+1−1
@@ -1,5 +1,5 @@
1Name: warp
1Name: warp
2−Version: 2.0.3.2
2+Version: 2.0.3.3
3Synopsis: A fast, light-weight web server for WAI applications.
3Synopsis: A fast, light-weight web server for WAI applications.
4License: MIT
4License: MIT
5License-file: LICENSE
5License-file: LICENSE