packages feed

servant-blaze 0.8 → 0.9

raw patch · 3 files changed

+27/−13 lines, 3 filesdep ~basedep ~http-mediadep ~servant

Dependency ranges changed: base, http-media, servant, servant-server, warp

Files

+ CHANGELOG.md view
@@ -0,0 +1,8 @@+# 0.9++- Also accept content type without character set i.e `text/html`+- Support only GHC >= 8.0++# 0.8++- Only single `MimeRender HTML a` instance. `blaze-markup` has `ToMarkup Markup` instance.
servant-blaze.cabal view
@@ -1,25 +1,28 @@+cabal-version:       >=1.10 name:                servant-blaze-version:             0.8+version:             0.9+ synopsis:            Blaze-html support for servant+category:            Servant, Web description:   Servant support for blaze-html   .   'HTML' content type which will use `ToMarkup` class.+ homepage:            http://haskell-servant.readthedocs.org/+bug-reports:         http://github.com/haskell-servant/servant-blaze/issues license:             BSD3 license-file:        LICENSE author:              Servant Contributors maintainer:          haskell-servant-maintainers@googlegroups.com-copyright:           2015-2016 Servant Contributors-category:            Web, Servant+copyright:           2015-2018 Servant Contributors build-type:          Simple-cabal-version:       >=1.10-bug-reports:         http://github.com/haskell-servant/servant-blaze/issues tested-with:-  GHC==7.8.4,-  GHC==7.10.3,-  GHC==8.0.2,-  GHC==8.2.2+  GHC ==8.0.2+   || ==8.2.2+   || ==8.4.4+   || ==8.6.3+extra-source-files: CHANGELOG.md  source-repository head   type: git@@ -27,8 +30,8 @@  library   exposed-modules:     Servant.HTML.Blaze-  build-depends:       base       >=4.7     && <5-                     , servant    >=0.7     && <0.14+  build-depends:       base       >=4.9     && <5+                     , servant    >=0.10     && <0.16                      , http-media >=0.6.4   && <0.8                      , blaze-html >=0.9.0.1 && <0.10   hs-source-dirs:      src@@ -45,7 +48,7 @@       base     , blaze-html     , servant-blaze-    , servant-server >=0.4.4.5  && <0.14+    , servant-server >=0.4.4.5  && <0.16     , wai            >=3.0.3.0  && <3.3     , warp           >=3.0.13.1 && <3.3   default-language: Haskell2010
src/Servant/HTML/Blaze.hs view
@@ -19,12 +19,15 @@ import           Servant.API                   (Accept (..), MimeRender (..)) import           Text.Blaze.Html               (Html, ToMarkup, toHtml) import           Text.Blaze.Html.Renderer.Utf8 (renderHtml)+import qualified Data.List.NonEmpty            as NE  data HTML deriving Typeable  -- | @text/html;charset=utf-8@ instance Accept HTML where-    contentType _ = "text" M.// "html" M./: ("charset", "utf-8")+    contentTypes _ =+      "text" M.// "html" M./: ("charset", "utf-8") NE.:|+      ["text" M.// "html"]  instance ToMarkup a => MimeRender HTML a where     mimeRender _ = renderHtml . toHtml