servant-swagger-ui-core 0.3.2 → 0.3.3

raw patch · 3 files changed

+44/−36 lines, 3 filesdep ~basedep ~servantdep ~servant-serverPVP: major bump suggested

API removals or changes: PVP suggests a major version bump

Dependency ranges changed: base, servant, servant-server, swagger2

API changes (from Hackage documentation)

Files

• Changelog.md +2/−3
• servant-swagger-ui-core.cabal +32/−32
• src/Servant/Swagger/UI/Core.hs +10/−1

@@ -1,7 +1,6 @@-# 0.3.2+# 0.3.3 -- Support GHC-8.6.-- Drop servant <0.14 support+- Add `swaggerSchemaUIServerImpl'`  # 0.3.1 

@@ -1,48 +1,48 @@-cabal-version:  1.12-name:           servant-swagger-ui-core-version:        0.3.2--synopsis:       Servant swagger ui core components-category:       Web, Servant, Swagger+cabal-version:      1.12+name:               servant-swagger-ui-core+version:            0.3.3+synopsis:           Servant swagger ui core components+category:           Web, Servant, Swagger description:-   Provide embedded swagger UI for servant and swagger (i.e. servant-swagger)-   .-   See servant-swagger-ui, servant-swagger-ui-jensoleg or-   servant-swagger-ui-redoc for "concrete" implementations.+  Provide embedded swagger UI for servant and swagger (i.e. servant-swagger)+  .+  See servant-swagger-ui, servant-swagger-ui-jensoleg or+  servant-swagger-ui-redoc for "concrete" implementations. -homepage:       https://github.com/haskell-servant/servant-swagger-ui-bug-reports:    https://github.com/haskell-servant/servant-swagger-ui/issues-author:         Oleg Grenrus <oleg.grenrus@iki.fi>-maintainer:     haskell-servant-maintainers@googlegroups.com-license:        BSD3-license-file:   LICENSE-build-type:     Simple-tested-with:    GHC ==7.8.4 || ==7.10.3 || ==8.0.2 ||  ==8.2.2 || ==8.4.4 || ==8.6.1-extra-source-files:-  Changelog.md+homepage:           https://github.com/haskell-servant/servant-swagger-ui+bug-reports:+  https://github.com/haskell-servant/servant-swagger-ui/issues +author:             Oleg Grenrus <oleg.grenrus@iki.fi>+maintainer:         haskell-servant-maintainers@googlegroups.com+license:            BSD3+license-file:       LICENSE+build-type:         Simple+tested-with:+  GHC ==7.8.4 || ==7.10.3 || ==8.0.2 || ==8.2.2 || ==8.4.4 || ==8.6.5++extra-source-files: Changelog.md+ source-repository head-  type: git+  type:     git   location: https://github.com/haskell-servant/servant-swagger-ui  library-  hs-source-dirs:-      src-  ghc-options: -Wall-+  hs-source-dirs:   src+  ghc-options:      -Wall   build-depends:       base                 >=4.7      && <4.13     , blaze-markup         >=0.7.0.2  && <0.9     , bytestring           >=0.10.4.0 && <0.11-    , http-media           >=0.7.1.3  && <0.8-    , servant              >=0.14     && <0.15-    , servant-blaze        >=0.8      && <0.9-    , servant-server       >=0.14     && <0.15-    , swagger2             >=2.3.0.1  && <2.4+    , http-media           >=0.7.1.3  && <0.9+    , servant              >=0.14     && <0.17+    , servant-blaze        >=0.8      && <0.10+    , servant-server       >=0.14     && <0.17+    , swagger2             >=2.3.0.1  && <2.5     , text                 >=1.2.3.0  && <1.3     , transformers         >=0.3      && <0.6     , transformers-compat  >=0.3      && <0.7     , wai-app-static       >=3.0.1.1  && <3.2-  exposed-modules:-      Servant.Swagger.UI.Core++  exposed-modules:  Servant.Swagger.UI.Core   default-language: Haskell2010

@@ -42,6 +42,7 @@     -- * Implementation details     SwaggerUiHtml(..),     swaggerSchemaUIServerImpl,+    swaggerSchemaUIServerImpl',     Handler,     ) where @@ -103,7 +104,15 @@     :: (Server api ~ Handler Swagger)     => T.Text -> [(FilePath, ByteString)]     -> Swagger -> Server (SwaggerSchemaUI' dir api)-swaggerSchemaUIServerImpl indexTemplate files swagger = return swagger+swaggerSchemaUIServerImpl indexTemplate files swagger+  = swaggerSchemaUIServerImpl' indexTemplate files $ return swagger++-- | Use a custom server to serve the Swagger spec source.+swaggerSchemaUIServerImpl'+    :: T.Text -> [(FilePath, ByteString)]+    -> Server api -> Server (SwaggerSchemaUI' dir api)+swaggerSchemaUIServerImpl' indexTemplate files server+       = server     :<|> return (SwaggerUiHtml indexTemplate)     :<|> return (SwaggerUiHtml indexTemplate)     :<|> rest