@@ -414,7 +414,7 @@ sendResponse th req socket (ResponseEnumerator res) =
414 liftIO $ Sock.sendMany socket
414 liftIO $ Sock.sendMany socket
415 $ L.toChunks $ toLazyByteString
415 $ L.toChunks $ toLazyByteString
416 $ headers (httpVersion req) s hs False
416 $ headers (httpVersion req) s hs False
417− return isPersist
417+ return (checkPersist req)
418 go s hs = chunk'
418 go s hs = chunk'
419 $ E.enumList 1 [headers (httpVersion req) s hs isChunked']
419 $ E.enumList 1 [headers (httpVersion req) s hs isChunked']
420 $$ E.joinI $ builderToByteString -- FIXME unsafeBuilderToByteString
420 $$ E.joinI $ builderToByteString -- FIXME unsafeBuilderToByteString