on master help sign in
Add a test
commitb9d34aac9da4eeaf0080c32bdc729217e0f2a7e9 authorMichael Snoyman <michael@snoyman.com> dateWed 23 Apr 2014, 16:06 (12 years ago) parent9b240bd
2 files changed+5−1
wai-test/test/Network/Wai/TestSpec.hs+4 wai-test/wai-test.cabal+1−1
wai-test/test/Network/Wai/TestSpec.hs+4
@@ -18,6 +18,10 @@ spec = do
1818 it "sets pathInfo" $ do
1919 pathInfo req `shouldBe` ["foo", "bar", "baz"]
2020
21+ it "utf8 path" $
22+ pathInfo (setPath defaultRequest "/foo/%D7%A9%D7%9C%D7%95%D7%9D/bar") `shouldBe`
23+ ["foo", "שלום", "bar"]
24+
2125 it "sets rawPathInfo" $ do
2226 rawPathInfo req `shouldBe` "/foo/bar/baz"
2327
wai-test/wai-test.cabal+1−1
@@ -1,5 +1,5 @@
11name: wai-test
2−version: 2.0.1.1
2+version: 2.0.1.2
33license: MIT
44license-file: LICENSE
55author: Michael Snoyman <michael@snoyman.com>