Remove PayloadParseError matcher from main app case since now we validate the request before building an ApiRequest.

2016-11-27 23:54:48 -05:00
parent b8ddc30252
commit 6a02d9efd5
1 changed files with 0 additions and 4 deletions
@@ -240,10 +240,6 @@ app dbStructure conf apiRequest =
          body <- encodeApi . toTableInfo <$> H.query schema accessibleTables
          return $ responseLBS status200 [toHeader CTOpenAPI] $ toS body
        (_, _, Just (PayloadParseError e)) ->
          return $ errResponse status400 $
            toS (formatGeneralError "Cannot parse request payload" (toS e))
        _ -> return notFound
    where