From 816d577f53dcb08b5c43ad00f6e5cae5bd2f10b3 Mon Sep 17 00:00:00 2001
From: Jacky Hu <hudayou@hotmail.com>
Date: Thu, 16 Jun 2016 15:52:13 +0800
Subject: [PATCH] Add undocumented "return=none" preference

---
 src/PostgREST/OpenAPI.hs | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/src/PostgREST/OpenAPI.hs b/src/PostgREST/OpenAPI.hs
index 787376128..563405973 100644
--- a/src/PostgREST/OpenAPI.hs
+++ b/src/PostgREST/OpenAPI.hs
@@ -148,9 +148,13 @@ makeGetParams cs =
   , makePreferParam ["plurality=singular", "count=none"]
   ]
 
+makeReturnPreferenceParam :: Param
+makeReturnPreferenceParam =
+  makePreferParam ["return=representation", "return=minimal", "return=none"]
+
 makePostParams :: Text -> [Param]
 makePostParams tn =
-  [ makePreferParam ["return=representation", "return=minimal"]
+  [ makeReturnPreferenceParam
   , (mempty :: Param)
     & name        .~ "body"
     & description ?~ tn
@@ -160,7 +164,7 @@ makePostParams tn =
 
 makeDeleteParams :: [Param]
 makeDeleteParams =
-  [ makePreferParam ["return=representation", "return=minimal"] ]
+  [ makeReturnPreferenceParam ]
 
 makePathItem :: (Table, [Column], [Text]) -> (FilePath, PathItem)
 makePathItem (t, cs, _) = ("/" ++ unpack tn, p $ tableInsertable t)