servant-swagger 1.1.1 → 1.1.2
raw patch · 3 files changed
+16/−3 lines, 3 filesdep ~aesondep ~insert-ordered-containersdep ~lensPVP ok
version bump matches the API change (PVP)
Dependency ranges changed: aeson, insert-ordered-containers, lens, servant
API changes (from Hackage documentation)
+ Servant.Swagger.Internal: instance forall k1 (sym :: GHC.Types.Symbol) a (sub :: k1). (GHC.TypeLits.KnownSymbol sym, Data.Swagger.Internal.ParamSchema.ToParamSchema a, Servant.Swagger.Internal.HasSwagger sub) => Servant.Swagger.Internal.HasSwagger (Servant.API.Capture.CaptureAll sym a Servant.API.Sub.:> sub)
Files
- CHANGELOG.md +7/−0
- servant-swagger.cabal +3/−3
- src/Servant/Swagger/Internal.hs +6/−0
CHANGELOG.md view
@@ -1,3 +1,10 @@+1.1.2+---++* Minor fixes:+ * Support for aeson-1, insert-ordered-containers-0.2+ * CaptureAll instance+ 1.1.1 ---
servant-swagger.cabal view
@@ -1,5 +1,5 @@ name: servant-swagger-version: 1.1.1+version: 1.1.2 synopsis: Generate Swagger specification for your servant API. description: Please see README.md homepage: https://github.com/haskell-servant/servant-swagger@@ -44,11 +44,11 @@ Servant.Swagger.Internal.TypeLevel.Every Servant.Swagger.Internal.TypeLevel.TMap hs-source-dirs: src- build-depends: aeson >=0.11.2.0 && <0.12+ build-depends: aeson >=0.11.2.0 && <1.1 , base >=4.7.0.0 && <4.10 , bytestring >=0.10.4.0 && <0.11 , http-media >=0.6.3 && <0.7- , insert-ordered-containers >=0.1.0.0 && <0.2+ , insert-ordered-containers >=0.1.0.0 && <0.3 , lens >=4.7.0.1 && <4.15 , servant >=0.5 && <0.9 , swagger2 >=2.1 && <2.2
src/Servant/Swagger/Internal.hs view
@@ -225,6 +225,12 @@ & in_ .~ ParamPath & paramSchema .~ toParamSchema (Proxy :: Proxy a)) +#if MIN_VERSION_servant(0,8,1)+-- | Swagger Spec doesn't have a notion of CaptureAll, this instance is the best effort.+instance (KnownSymbol sym, ToParamSchema a, HasSwagger sub) => HasSwagger (CaptureAll sym a :> sub) where+ toSwagger _ = toSwagger (Proxy :: Proxy (Capture sym a :> sub))+#endif+ instance (KnownSymbol sym, ToParamSchema a, HasSwagger sub) => HasSwagger (QueryParam sym a :> sub) where toSwagger _ = toSwagger (Proxy :: Proxy sub) & addParam param