[wai-extra] Set `ChunkedBody` for `srequest`, fixes #652
commit46f9d2477a82c4f62be2b37b1e29f7fec0f6fd00
authorJeroen Bransen <jeroen@chordify.net>
dateFri 10 Nov 2017, 13:43 (9 years ago)
parent1b1ac47
wai-extra/Network/Wai/Test.hs+1
@@ -176,6 +176,7 @@ srequest (SRequest req bod) = do
176176 case bss of
177177 [] -> ([], S.empty)
178178 x:y -> (y, x)
179+ , requestBodyLength = ChunkedBody
179180 }
180181 req'' <- addCookiesToRequest req'
181182 response <- liftIO $ do