Add undocumented "return=none" preference

This commit is contained in:
Jacky Hu
2016-06-18 10:18:43 +08:00
parent a7316aff01
commit 816d577f53
+6 -2
View File
@@ -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)