typeable/wai
1
0
Fork 0
mirror of https://github.com/typeable/wai.git synced 2024-12-27 08:05:37 +03:00
Code Issues Projects Releases Wiki Activity

[wai-extra] Set requestBodyLength to the actual length of the post body

Browse Source
This commit is contained in:
Jeroen Bransen 2017-11-20 15:41:25 +01:00
parent e900d888ba
commit 699de9736f
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
wai-extra/ChangeLog.md
View File

@ -1,6 +1,6 @@
## 3.0.20.1
* Set `ChunkedBody` for `srequest` [#654](https://github.com/yesodweb/wai/pull/654)
* Set `requestBodyLength` for `srequest` [#654](https://github.com/yesodweb/wai/pull/654)
## 3.0.20.0

2
wai-extra/Network/Wai/Test.hs
View File

@ -176,7 +176,7 @@ srequest (SRequest req bod) = do
case bss of
[] -> ([], S.empty)
x:y -> (y, x)
, requestBodyLength = ChunkedBody
, requestBodyLength = KnownLength $ fromIntegral $ L.length bod
}
req'' <- addCookiesToRequest req'
response <- liftIO $ do