servant-swagger 1.2.2 → 1.2.3
raw patch · 3 files changed
+9/−6 lines, 3 filesdep ~doctestdep ~servant
Dependency ranges changed: doctest, servant
Files
- CHANGELOG.md +5/−0
- servant-swagger.cabal +2/−2
- src/Servant/Swagger/Internal.hs +2/−4
CHANGELOG.md view
@@ -1,3 +1,8 @@+1.2.3+-----++- Require insert-ordered-containers-0.3, swagger2-2.9+ 1.2.1 -----
servant-swagger.cabal view
@@ -1,6 +1,6 @@ cabal-version: 2.2 name: servant-swagger-version: 1.2.2+version: 1.2.3 synopsis: Generate a Swagger/OpenAPI/OAS 2.0 specification for your servant API. description: Swagger is a project used to describe and document RESTful APIs. The core of the@@ -77,7 +77,7 @@ , http-media >=0.7.1.3 && <0.9 , insert-ordered-containers >=0.3 && <0.4 , lens >=4.17 && <6- , servant >=0.20.2 && <0.21+ , servant >=0.20.3 && <0.21 , singleton-bool >=0.1.4 && <0.2 , swagger2 >=2.9 && <2.10 , text >=1.2.3.0 && <2.2
src/Servant/Swagger/Internal.hs view
@@ -389,10 +389,12 @@ toSwagger (Proxy :: Proxy api) & allOperations . summary %~ (Just (Text.pack (symbolVal (Proxy :: Proxy desc))) <>) +#if MIN_VERSION_servant(0,20,4) instance (HasSwagger api, KnownSymbol operationId) => HasSwagger (OperationId operationId :> api) where toSwagger _ = toSwagger (Proxy :: Proxy api) & allOperations . operationId %~ (Just (Text.pack (symbolVal (Proxy :: Proxy operationId))) <>)+#endif instance (HasSwagger sub, KnownSymbol (FoldDescription mods), KnownSymbol sym, SBoolI (FoldRequired mods), ToParamSchema a) => HasSwagger (QueryParam' mods sym a :> sub) where toSwagger _ =@@ -431,11 +433,7 @@ & paramSchema .~ pschema pschemaItems = SwaggerItemsPrimitive (Just CollectionMulti) (toParamSchema (Proxy :: Proxy a))-#if MIN_VERSION_swagger2(2,4,0) pschema = mempty & type_ ?~ SwaggerArray & items ?~ pschemaItems-#else- pschema = mempty & type_ .~ SwaggerArray & items ?~ pschemaItems-#endif instance (HasSwagger sub, KnownSymbol sym) => HasSwagger (QueryFlag sym :> sub) where toSwagger _ =