wai-test 1.3.1 → 1.3.1.1

raw patch · 2 files changed

+7/−3 lines, 2 filesnew-uploaderPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

• Network/Wai/Test.hs +6/−2
• wai-test.cabal +1/−1

@@ -102,8 +102,12 @@  setRawPathInfo :: Request -> S8.ByteString -> Request setRawPathInfo r rawPinfo =-  let pInfo = T.split (== '/') $ TE.decodeUtf8 rawPinfo-  in  r { rawPathInfo = rawPinfo, pathInfo = pInfo }+    let pInfo = dropFrontSlash $ T.split (== '/') $ TE.decodeUtf8 rawPinfo+    in  r { rawPathInfo = rawPinfo, pathInfo = pInfo }+  where+    dropFrontSlash ("":"":[]) = [] -- homepage, a single slash+    dropFrontSlash ("":path) = path+    dropFrontSlash path = path  srequest :: SRequest -> Session SResponse srequest (SRequest req bod) = do

@@ -1,5 +1,5 @@ name:            wai-test-version:         1.3.1+version:         1.3.1.1 license:         MIT license-file:    LICENSE author:          Michael Snoyman <michael@snoyman.com>