Parse JSON -> SqlValue as Int as well as Double when possible

2014-08-26 22:38:09 -07:00
parent c007dbb2b2
commit 134ca1f2a8
2 changed files with 8 additions and 7 deletions
@@ -57,7 +57,7 @@ spec = around appWithFixture $
      it "builds response location header appropriately" $
        post "/compound_pk" [json| { "k1":12, "k2":42 } |]
          `shouldRespondWith` ResponseMatcher {
-            matchBody    = Just "compare with error",
+            matchBody    = Nothing,
            matchStatus  = 201,
-            matchHeaders = [("Location", "/auto_incrementing_pk?k1=eq.12&k2=eq.42")]
+            matchHeaders = [("Location", "/compound_pk?k1=eq.12&k2=eq.42")]
          }