Merge pull request #654 from jbransen/issue-652
[wai-extra] Set `requestBodyLength` for `srequest`, fixes #652
commit364309aa3cb454baa315030cec6334204ecfbc5b
authorMichael Snoyman <michael@snoyman.com>
dateTue 21 Nov 2017, 13:58 (9 years ago)
parente093f83699de97
wai-extra/ChangeLog.md+4
@@ -1,3 +1,7 @@
1+## 3.0.20.1
2+
3+* Set `requestBodyLength` for `srequest` [#654](https://github.com/yesodweb/wai/pull/654)
4+
15## 3.0.20.0
26
37* runSessionWith (runSession variant that gives access to ClientState) [#629](https://github.com/yesodweb/wai/pull/629)
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 = KnownLength $ fromIntegral $ L.length bod
179180 }
180181 req'' <- addCookiesToRequest req'
181182 response <- liftIO $ do
wai-extra/wai-extra.cabal+1−1
@@ -1,5 +1,5 @@
11Name: wai-extra
2−Version: 3.0.20.0
2+Version: 3.0.20.1
33Synopsis: Provides some basic WAI handlers and middleware.
44description:
55 Provides basic WAI handler and middleware functionality: