packages feed

wai-test 1.1.0.1 → 1.1.1

raw patch · 2 files changed

+10/−1 lines, 2 filesdep +text

Dependencies added: text

Files

Network/Wai/Test.hs view
@@ -9,6 +9,7 @@     , SRequest (..)     , SResponse (..)     , defaultRequest+    , setRawPathInfo       -- * Assertions     , assertStatus     , assertContentType@@ -33,6 +34,8 @@ import qualified Network.HTTP.Types as H import Data.CaseInsensitive (CI) import qualified Data.ByteString as S+import qualified Data.Text as T+import qualified Data.Text.Encoding as TE import qualified Data.Conduit as C import qualified Data.Conduit.List as CL import Data.Monoid (mempty)@@ -78,6 +81,11 @@     , requestBody = mempty     , vault = mempty     }++setRawPathInfo :: Request -> S8.ByteString -> Request+setRawPathInfo r rawPinfo =+  let pInfo = T.split (== '/') $ TE.decodeUtf8 rawPinfo+  in  r { rawPathInfo = rawPinfo, pathInfo = pInfo }  srequest :: SRequest -> Session SResponse srequest (SRequest req bod) = do
wai-test.cabal view
@@ -1,5 +1,5 @@ name:            wai-test-version:         1.1.0.1+version:         1.1.1 license:         BSD3 license-file:    LICENSE author:          Michael Snoyman <michael@snoyman.com>@@ -16,6 +16,7 @@     build-depends:   base                      >= 4        && < 5                    , wai                       >= 1.1      && < 1.2                    , bytestring                >= 0.9.1.4  && < 0.10+                   , text                      >= 0.7      && < 0.12                    , blaze-builder             >= 0.2.1.4  && < 0.4                    , transformers              >= 0.2.2    && < 0.3                    , containers                >= 0.2      && < 0.5