Skip to content

Commit

Permalink
Browse files Browse the repository at this point in the history
Correct tests: json content-type
  • Loading branch information
phadej committed Feb 1, 2017
1 parent 244a970 commit 4f1ee8a
Show file tree
Hide file tree
Showing 2 changed files with 3 additions and 3 deletions.
2 changes: 1 addition & 1 deletion servant-mock.cabal
Expand Up @@ -51,7 +51,7 @@ executable mock-app
aeson,
base,
servant-mock,
servant-server,
servant-server >= 0.10,
QuickCheck,
warp
if flag(example)
Expand Down
4 changes: 2 additions & 2 deletions test/Servant/MockSpec.hs
Expand Up @@ -81,7 +81,7 @@ spec = do
it "serves arbitrary response bodies" $ do
get "/" `shouldRespondWith` 200{
matchHeaders = return $ MatchHeader $ \ h _ ->
if h == [("Content-Type", "application/json"), ("foo", "ArbitraryHeader")]
if h == [("Content-Type", "application/json;charset=utf-8"), ("foo", "ArbitraryHeader")]
then Nothing
else Just ("headers not correct\n")
}
Expand All @@ -90,7 +90,7 @@ spec = do
it "works for no additional headers" $ do
get "/" `shouldRespondWith` 200{
matchHeaders = return $ MatchHeader $ \ h _ ->
if h == [("Content-Type", "application/json")]
if h == [("Content-Type", "application/json;charset=utf-8")]
then Nothing
else Just ("headers not correct\n")
}

0 comments on commit 4f1ee8a

Please sign in to comment.