From efc725fb24e1c6e92b9c1e0426ec3895e6a746df Mon Sep 17 00:00:00 2001
From: Wolfgang Walther <walther@technowledgy.de>
Date: Mon, 2 Nov 2020 11:54:12 +0100
Subject: [PATCH] run stylish-haskell v0.12.1.0

---
 src/PostgREST/DbRequestBuilder.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/PostgREST/DbRequestBuilder.hs b/src/PostgREST/DbRequestBuilder.hs
index 8770d8b0a..b9cd3b804 100644
--- a/src/PostgREST/DbRequestBuilder.hs
+++ b/src/PostgREST/DbRequestBuilder.hs
@@ -303,7 +303,7 @@ mutateRequest schema tName apiRequest pkCols readReq = mapLeft errorResponseFor
            not (null (S.fromList pkCols)) &&
            all (\case
               Filter _ (OpExpr False (Op "eq" _)) -> True
-              _ -> False) flts
+              _                                   -> False) flts
           then Insert qi (iColumns apiRequest) (Just (MergeDuplicates, pkCols)) <$> combinedLogic <*> pure returnings
         else
           Left InvalidFilters) =<< filters