Fix tests for explicit errors in aeson-1.4.7, and raise lower bound

This commit is contained in:
Robert Vollmert
2020-04-16 17:47:52 -05:00
committed by Steve Chavez
parent b609d8491e
commit 5838214910
2 changed files with 5 additions and 5 deletions
+3 -3
View File
@@ -46,7 +46,7 @@ library
build-depends: base >= 4.9 && < 4.14
, HTTP >= 4000.3.7 && < 4000.4
, Ranged-sets >= 0.3 && < 0.5
, aeson >= 0.11.3 && < 1.5
, aeson >= 1.4.7 && < 1.5
, ansi-wl-pprint >= 0.6.7 && < 0.7
, base64-bytestring >= 1 && < 1.1
, bytestring >= 0.10.8 && < 0.11
@@ -155,7 +155,7 @@ test-suite spec
TestTypes
hs-source-dirs: test
build-depends: base >= 4.9 && < 4.14
, aeson >= 0.11.3 && < 1.5
, aeson >= 1.4.7 && < 1.5
, aeson-qq >= 0.8.1 && < 0.9
, async >= 2.1.1 && < 2.3
, auto-update >= 0.1.4 && < 0.2
@@ -199,7 +199,7 @@ Test-Suite spec-querycost
Main-Is: QueryCost.hs
Other-Modules: SpecHelper
Build-Depends: base >= 4.9 && < 4.14
, aeson >= 0.11.3 && < 1.5
, aeson >= 1.4.7 && < 1.5
, aeson-qq >= 0.8.1 && < 0.9
, async >= 2.1.1 && < 2.3
, auto-update >= 0.1.4 && < 0.2
+2 -2
View File
@@ -204,7 +204,7 @@ spec actualPgVersion = do
it "fails with 400 and error" $
post "/simple_pk" "}{ x = 2"
`shouldRespondWith`
[json|{"message":"Error in $: Failed reading: not a valid json value"}|]
[json|{"message":"Error in $: Failed reading: not a valid json value at '}{x=2'"}|]
{ matchStatus = 400
, matchHeaders = [matchContentTypeJson]
}
@@ -425,7 +425,7 @@ spec actualPgVersion = do
it "fails with 400 and error" $
request methodPatch "/simple_pk" [] "}{ x = 2"
`shouldRespondWith`
[json|{"message":"Error in $: Failed reading: not a valid json value"}|]
[json|{"message":"Error in $: Failed reading: not a valid json value at '}{x=2'"}|]
{ matchStatus = 400,
matchHeaders = [matchContentTypeJson]
}