From 6a02d9efd5ef658fda1fb788f10ece695f860c0d Mon Sep 17 00:00:00 2001
From: Diogo Biazus <diogo@biazus.me>
Date: Sun, 27 Nov 2016 23:54:48 -0500
Subject: [PATCH] Remove PayloadParseError matcher from main app case since now
 we validate the request before building an ApiRequest.

---
 src/PostgREST/App.hs | 4 ----
 1 file changed, 4 deletions(-)

diff --git a/src/PostgREST/App.hs b/src/PostgREST/App.hs
index 345d97f9a..4cc1010c5 100644
--- a/src/PostgREST/App.hs
+++ b/src/PostgREST/App.hs
@@ -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