Fix a few tests

2015-10-26 13:50:56 +02:00
parent c265cf829b
commit 1fdb700bc8
4 changed files with 57 additions and 26 deletions
@@ -272,7 +272,7 @@ spec =
      request methodGet "/simple_pk"
              (acceptHdrs "text/csv; version=1") ""
        `shouldRespondWith` ResponseMatcher {
-          matchBody    = Just "k,extra\rxyyx,u\rxYYx,v"
+          matchBody    = Just "k,extra\nxyyx,u\nxYYx,v"
        , matchStatus  = 200
        , matchHeaders = ["Content-Type" <:> "text/csv"]
        }