git.iko.soy/typeable/wai
on master help sign in
Fix wai-extra tests
8e58a42Michael Snoyman
wai-extra/runtests.hs+3−1
compare with master
unifiedsplit
@@ -255,7 +255,9 @@ caseJsonp = flip runSession jsonpApp $ do
255 assertBody "{\"foo\":\"bar\"}" sres3
255 assertBody "{\"foo\":\"bar\"}" sres3
256
256
257gzipApp :: Application
257gzipApp :: Application
258−gzipApp = gzip True $ const $ return $ responseLBS status200 [] "test"
258+gzipApp = gzip True $ const $ return $ responseLBS status200
259+ [("Content-Type", "text/plain")]
260+ "test"
259
261
260caseGzip :: Assertion
262caseGzip :: Assertion
261caseGzip = flip runSession gzipApp $ do
263caseGzip = flip runSession gzipApp $ do
wai-extra/wai-extra.cabal+2
@@ -73,6 +73,8 @@ test-suite runtests
73 , zlib-bindings
73 , zlib-bindings
74 , blaze-builder-enumerator
74 , blaze-builder-enumerator
75 , blaze-builder
75 , blaze-builder
76+ , zlib-enum
77+ , data-default
76
78
77source-repository head
79source-repository head
78 type: git
80 type: git