Remove redundant consumes property for get operation

This commit is contained in:
Jacky Hu
2016-06-18 10:18:43 +08:00
parent 733b2cc05b
commit fd0b354cd0
-1
View File
@@ -192,7 +192,6 @@ makeRootPathItem = ("/", p)
getOp = (mempty :: Operation)
& tags .~ Set.fromList ["/"]
& produces ?~ makeMimeList [ApplicationJSON, OpenAPI]
& consumes ?~ makeMimeList [ApplicationJSON, OpenAPI]
& at 200 ?~ "OK"
pr = (mempty :: PathItem) & get ?~ getOp
p = pr