git.iko.soy/typeable/openapi3
on master help sign in
Simplify example in docs
30f0e95Nickolay Kudasov
src/Data/Swagger.hs+1−2
@@ -166,8 +166,7 @@ import Data.Swagger.Internal
166-- encode $ (mempty :: Swagger) & paths .~
166-- encode $ (mempty :: Swagger) & paths .~
167-- [ ("/user", mempty & get ?~ (mempty
167-- [ ("/user", mempty & get ?~ (mempty
168-- & produces ?~ MimeList ["application/json"]
168-- & produces ?~ MimeList ["application/json"]
169−-- & responses .~ (mempty
170−-- & responses . at 200 ?~ Inline (mempty & schema ?~ Ref (Reference "#/definitions/User")))))]
169+-- & at 200 ?~ Inline (mempty & schema ?~ Ref (Reference "#/definitions/User")))) ]
171-- :}
170-- :}
172-- "{\"swagger\":\"2.0\",\"info\":{\"version\":\"\",\"title\":\"\"},\"paths\":{\"/user\":{\"get\":{\"responses\":{\"200\":{\"schema\":{\"$ref\":\"#/definitions/#/definitions/User\"},\"description\":\"\"}},\"produces\":[\"application/json\"]}}}}"
171-- "{\"swagger\":\"2.0\",\"info\":{\"version\":\"\",\"title\":\"\"},\"paths\":{\"/user\":{\"get\":{\"responses\":{\"200\":{\"schema\":{\"$ref\":\"#/definitions/#/definitions/User\"},\"description\":\"\"}},\"produces\":[\"application/json\"]}}}}"
173--
172--