Hello community,

here is the log from the commit of package ghc-blaze-html for openSUSE:Factory 
checked in at 2017-08-31 20:50:13
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/ghc-blaze-html (Old)
 and      /work/SRC/openSUSE:Factory/.ghc-blaze-html.new (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Package is "ghc-blaze-html"

Thu Aug 31 20:50:13 2017 rev:10 rq:513213 version:0.9.0.1

Changes:
--------
--- /work/SRC/openSUSE:Factory/ghc-blaze-html/ghc-blaze-html.changes    
2017-01-12 15:47:13.696453499 +0100
+++ /work/SRC/openSUSE:Factory/.ghc-blaze-html.new/ghc-blaze-html.changes       
2017-08-31 20:50:14.871797490 +0200
@@ -1,0 +2,5 @@
+Thu Jul 27 14:04:15 UTC 2017 - [email protected]
+
+- Update to version 0.9.0.1.
+
+-------------------------------------------------------------------

Old:
----
  blaze-html-0.8.1.3.tar.gz

New:
----
  blaze-html-0.9.0.1.tar.gz

++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Other differences:
------------------
++++++ ghc-blaze-html.spec ++++++
--- /var/tmp/diff_new_pack.0IqAHp/_old  2017-08-31 20:50:15.923649842 +0200
+++ /var/tmp/diff_new_pack.0IqAHp/_new  2017-08-31 20:50:15.927649280 +0200
@@ -1,7 +1,7 @@
 #
 # spec file for package ghc-blaze-html
 #
-# Copyright (c) 2016 SUSE LINUX GmbH, Nuernberg, Germany.
+# Copyright (c) 2017 SUSE LINUX GmbH, Nuernberg, Germany.
 #
 # All modifications and additions to the file contributed by third parties
 # remain the property of their copyright owners, unless otherwise agreed
@@ -19,7 +19,7 @@
 %global pkg_name blaze-html
 %bcond_with tests
 Name:           ghc-%{pkg_name}
-Version:        0.8.1.3
+Version:        0.9.0.1
 Release:        0
 Summary:        A blazingly fast HTML combinator library for Haskell
 License:        BSD-3-Clause

++++++ blaze-html-0.8.1.3.tar.gz -> blaze-html-0.9.0.1.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/blaze-html-0.8.1.3/CHANGELOG 
new/blaze-html-0.9.0.1/CHANGELOG
--- old/blaze-html-0.8.1.3/CHANGELOG    2016-11-28 11:32:14.000000000 +0100
+++ new/blaze-html-0.9.0.1/CHANGELOG    2017-01-30 17:56:16.000000000 +0100
@@ -1,3 +1,18 @@
+# Changelog
+
+- 0.9.0.1
+    * Fix CHANGELOG
+
+- 0.9.0.0
+    * Bump blaze-html dependency to 0.8.  This has a few consequences:
+        - Make `MarkupM` finally adhere to the Monad laws
+        - Stricten the `IsString` instance to only work with `MarkupM ()` and
+          not `MarkupM a`
+        - Change the type of `contents` to `MarkupM a -> MarkupM a`
+        - Add a `Semigroup` instance for `MarkupM`
+
+- 0.7.1.1
+
 - 0.8.1.3
     * Bump HUnit dependency to 1.5
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/blaze-html-0.8.1.3/blaze-html.cabal 
new/blaze-html-0.9.0.1/blaze-html.cabal
--- old/blaze-html-0.8.1.3/blaze-html.cabal     2016-11-28 11:32:14.000000000 
+0100
+++ new/blaze-html-0.9.0.1/blaze-html.cabal     2017-01-30 17:56:16.000000000 
+0100
@@ -1,5 +1,5 @@
 Name:         blaze-html
-Version:      0.8.1.3
+Version:      0.9.0.1
 Homepage:     http://jaspervdj.be/blaze
 Bug-Reports:  http://github.com/jaspervdj/blaze-html/issues
 License:      BSD3
@@ -53,7 +53,7 @@
   Build-depends:
     base          >= 4    && < 5,
     blaze-builder >= 0.3  && < 0.5,
-    blaze-markup  >= 0.7  && < 0.8,
+    blaze-markup  >= 0.8  && < 0.9,
     bytestring    >= 0.9  && < 0.11,
     text          >= 0.10 && < 1.3
 
@@ -78,7 +78,7 @@
     -- Copied from regular dependencies...
     base          >= 4    && < 5,
     blaze-builder >= 0.3  && < 0.5,
-    blaze-markup  >= 0.7  && < 0.8,
+    blaze-markup  >= 0.8  && < 0.9,
     bytestring    >= 0.9  && < 0.11,
     text          >= 0.10 && < 1.3
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/blaze-html-0.8.1.3/src/Text/Blaze/Html4/FrameSet.hs 
new/blaze-html-0.9.0.1/src/Text/Blaze/Html4/FrameSet.hs
--- old/blaze-html-0.8.1.3/src/Text/Blaze/Html4/FrameSet.hs     2016-11-28 
11:32:14.000000000 +0100
+++ new/blaze-html-0.9.0.1/src/Text/Blaze/Html4/FrameSet.hs     2017-01-30 
17:56:16.000000000 +0100
@@ -252,7 +252,7 @@
 -- > <area />
 --
 area :: Html  -- ^ Resulting HTML.
-area = Leaf "area" "<area" ">"
+area = Leaf "area" "<area" ">" ()
 {-# INLINE area #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -287,7 +287,7 @@
 -- > <basefont />
 --
 basefont :: Html  -- ^ Resulting HTML.
-basefont = Leaf "basefont" "<basefont" ">"
+basefont = Leaf "basefont" "<basefont" ">" ()
 {-# INLINE basefont #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -376,7 +376,7 @@
 -- > <br />
 --
 br :: Html  -- ^ Resulting HTML.
-br = Leaf "br" "<br" ">"
+br = Leaf "br" "<br" ">" ()
 {-# INLINE br #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -483,7 +483,7 @@
 -- > <col />
 --
 col :: Html  -- ^ Resulting HTML.
-col = Leaf "col" "<col" ">"
+col = Leaf "col" "<col" ">" ()
 {-# INLINE col #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -716,7 +716,7 @@
 -- > <frame />
 --
 frame :: Html  -- ^ Resulting HTML.
-frame = Leaf "frame" "<frame" ">"
+frame = Leaf "frame" "<frame" ">" ()
 {-# INLINE frame #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -877,7 +877,7 @@
 -- > <hr />
 --
 hr :: Html  -- ^ Resulting HTML.
-hr = Leaf "hr" "<hr" ">"
+hr = Leaf "hr" "<hr" ">" ()
 {-# INLINE hr #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -948,7 +948,7 @@
 -- > <img />
 --
 img :: Html  -- ^ Resulting HTML.
-img = Leaf "img" "<img" ">"
+img = Leaf "img" "<img" ">" ()
 {-# INLINE img #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -965,7 +965,7 @@
 -- > <input />
 --
 input :: Html  -- ^ Resulting HTML.
-input = Leaf "input" "<input" ">"
+input = Leaf "input" "<input" ">" ()
 {-# INLINE input #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -1090,7 +1090,7 @@
 -- > <link />
 --
 link :: Html  -- ^ Resulting HTML.
-link = Leaf "link" "<link" ">"
+link = Leaf "link" "<link" ">" ()
 {-# INLINE link #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -1143,7 +1143,7 @@
 -- > <meta />
 --
 meta :: Html  -- ^ Resulting HTML.
-meta = Leaf "meta" "<meta" ">"
+meta = Leaf "meta" "<meta" ">" ()
 {-# INLINE meta #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -1286,7 +1286,7 @@
 -- > <param />
 --
 param :: Html  -- ^ Resulting HTML.
-param = Leaf "param" "<param" ">"
+param = Leaf "param" "<param" ">" ()
 {-# INLINE param #-}
 
 -- WARNING: The next block of code was automatically generated by
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/blaze-html-0.8.1.3/src/Text/Blaze/Html4/Strict.hs 
new/blaze-html-0.9.0.1/src/Text/Blaze/Html4/Strict.hs
--- old/blaze-html-0.8.1.3/src/Text/Blaze/Html4/Strict.hs       2016-11-28 
11:32:14.000000000 +0100
+++ new/blaze-html-0.9.0.1/src/Text/Blaze/Html4/Strict.hs       2017-01-30 
17:56:16.000000000 +0100
@@ -221,7 +221,7 @@
 -- > <area />
 --
 area :: Html  -- ^ Resulting HTML.
-area = Leaf "area" "<area" ">"
+area = Leaf "area" "<area" ">" ()
 {-# INLINE area #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -328,7 +328,7 @@
 -- > <br />
 --
 br :: Html  -- ^ Resulting HTML.
-br = Leaf "br" "<br" ">"
+br = Leaf "br" "<br" ">" ()
 {-# INLINE br #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -417,7 +417,7 @@
 -- > <col />
 --
 col :: Html  -- ^ Resulting HTML.
-col = Leaf "col" "<col" ">"
+col = Leaf "col" "<col" ">" ()
 {-# INLINE col #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -740,7 +740,7 @@
 -- > <hr />
 --
 hr :: Html  -- ^ Resulting HTML.
-hr = Leaf "hr" "<hr" ">"
+hr = Leaf "hr" "<hr" ">" ()
 {-# INLINE hr #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -793,7 +793,7 @@
 -- > <img />
 --
 img :: Html  -- ^ Resulting HTML.
-img = Leaf "img" "<img" ">"
+img = Leaf "img" "<img" ">" ()
 {-# INLINE img #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -810,7 +810,7 @@
 -- > <input />
 --
 input :: Html  -- ^ Resulting HTML.
-input = Leaf "input" "<input" ">"
+input = Leaf "input" "<input" ">" ()
 {-# INLINE input #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -917,7 +917,7 @@
 -- > <link />
 --
 link :: Html  -- ^ Resulting HTML.
-link = Leaf "link" "<link" ">"
+link = Leaf "link" "<link" ">" ()
 {-# INLINE link #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -952,7 +952,7 @@
 -- > <meta />
 --
 meta :: Html  -- ^ Resulting HTML.
-meta = Leaf "meta" "<meta" ">"
+meta = Leaf "meta" "<meta" ">" ()
 {-# INLINE meta #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -1077,7 +1077,7 @@
 -- > <param />
 --
 param :: Html  -- ^ Resulting HTML.
-param = Leaf "param" "<param" ">"
+param = Leaf "param" "<param" ">" ()
 {-# INLINE param #-}
 
 -- WARNING: The next block of code was automatically generated by
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/blaze-html-0.8.1.3/src/Text/Blaze/Html4/Transitional.hs 
new/blaze-html-0.9.0.1/src/Text/Blaze/Html4/Transitional.hs
--- old/blaze-html-0.8.1.3/src/Text/Blaze/Html4/Transitional.hs 2016-11-28 
11:32:14.000000000 +0100
+++ new/blaze-html-0.9.0.1/src/Text/Blaze/Html4/Transitional.hs 2017-01-30 
17:56:16.000000000 +0100
@@ -250,7 +250,7 @@
 -- > <area />
 --
 area :: Html  -- ^ Resulting HTML.
-area = Leaf "area" "<area" ">"
+area = Leaf "area" "<area" ">" ()
 {-# INLINE area #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -285,7 +285,7 @@
 -- > <basefont />
 --
 basefont :: Html  -- ^ Resulting HTML.
-basefont = Leaf "basefont" "<basefont" ">"
+basefont = Leaf "basefont" "<basefont" ">" ()
 {-# INLINE basefont #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -374,7 +374,7 @@
 -- > <br />
 --
 br :: Html  -- ^ Resulting HTML.
-br = Leaf "br" "<br" ">"
+br = Leaf "br" "<br" ">" ()
 {-# INLINE br #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -481,7 +481,7 @@
 -- > <col />
 --
 col :: Html  -- ^ Resulting HTML.
-col = Leaf "col" "<col" ">"
+col = Leaf "col" "<col" ">" ()
 {-# INLINE col #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -840,7 +840,7 @@
 -- > <hr />
 --
 hr :: Html  -- ^ Resulting HTML.
-hr = Leaf "hr" "<hr" ">"
+hr = Leaf "hr" "<hr" ">" ()
 {-# INLINE hr #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -911,7 +911,7 @@
 -- > <img />
 --
 img :: Html  -- ^ Resulting HTML.
-img = Leaf "img" "<img" ">"
+img = Leaf "img" "<img" ">" ()
 {-# INLINE img #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -928,7 +928,7 @@
 -- > <input />
 --
 input :: Html  -- ^ Resulting HTML.
-input = Leaf "input" "<input" ">"
+input = Leaf "input" "<input" ">" ()
 {-# INLINE input #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -1053,7 +1053,7 @@
 -- > <link />
 --
 link :: Html  -- ^ Resulting HTML.
-link = Leaf "link" "<link" ">"
+link = Leaf "link" "<link" ">" ()
 {-# INLINE link #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -1106,7 +1106,7 @@
 -- > <meta />
 --
 meta :: Html  -- ^ Resulting HTML.
-meta = Leaf "meta" "<meta" ">"
+meta = Leaf "meta" "<meta" ">" ()
 {-# INLINE meta #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -1249,7 +1249,7 @@
 -- > <param />
 --
 param :: Html  -- ^ Resulting HTML.
-param = Leaf "param" "<param" ">"
+param = Leaf "param" "<param" ">" ()
 {-# INLINE param #-}
 
 -- WARNING: The next block of code was automatically generated by
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/blaze-html-0.8.1.3/src/Text/Blaze/Html5.hs 
new/blaze-html-0.9.0.1/src/Text/Blaze/Html5.hs
--- old/blaze-html-0.8.1.3/src/Text/Blaze/Html5.hs      2016-11-28 
11:32:14.000000000 +0100
+++ new/blaze-html-0.9.0.1/src/Text/Blaze/Html5.hs      2017-01-30 
17:56:16.000000000 +0100
@@ -232,7 +232,7 @@
 -- > <area />
 --
 area :: Html  -- ^ Resulting HTML.
-area = Leaf "area" "<area" ">"
+area = Leaf "area" "<area" ">" ()
 {-# INLINE area #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -321,7 +321,7 @@
 -- > <base />
 --
 base :: Html  -- ^ Resulting HTML.
-base = Leaf "base" "<base" ">"
+base = Leaf "base" "<base" ">" ()
 {-# INLINE base #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -392,7 +392,7 @@
 -- > <br />
 --
 br :: Html  -- ^ Resulting HTML.
-br = Leaf "br" "<br" ">"
+br = Leaf "br" "<br" ">" ()
 {-# INLINE br #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -499,7 +499,7 @@
 -- > <col />
 --
 col :: Html  -- ^ Resulting HTML.
-col = Leaf "col" "<col" ">"
+col = Leaf "col" "<col" ">" ()
 {-# INLINE col #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -714,7 +714,7 @@
 -- > <embed />
 --
 embed :: Html  -- ^ Resulting HTML.
-embed = Leaf "embed" "<embed" ">"
+embed = Leaf "embed" "<embed" ">" ()
 {-# INLINE embed #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -983,7 +983,7 @@
 -- > <hr />
 --
 hr :: Html  -- ^ Resulting HTML.
-hr = Leaf "hr" "<hr" ">"
+hr = Leaf "hr" "<hr" ">" ()
 {-# INLINE hr #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -1054,7 +1054,7 @@
 -- > <img />
 --
 img :: Html  -- ^ Resulting HTML.
-img = Leaf "img" "<img" ">"
+img = Leaf "img" "<img" ">" ()
 {-# INLINE img #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -1071,7 +1071,7 @@
 -- > <input />
 --
 input :: Html  -- ^ Resulting HTML.
-input = Leaf "input" "<input" ">"
+input = Leaf "input" "<input" ">" ()
 {-# INLINE input #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -1124,7 +1124,7 @@
 -- > <keygen />
 --
 keygen :: Html  -- ^ Resulting HTML.
-keygen = Leaf "keygen" "<keygen" ">"
+keygen = Leaf "keygen" "<keygen" ">" ()
 {-# INLINE keygen #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -1195,7 +1195,7 @@
 -- > <link />
 --
 link :: Html  -- ^ Resulting HTML.
-link = Leaf "link" "<link" ">"
+link = Leaf "link" "<link" ">" ()
 {-# INLINE link #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -1284,7 +1284,7 @@
 -- > <menuitem />
 --
 menuitem :: Html  -- ^ Resulting HTML.
-menuitem = Leaf "menuitem" "<menuitem" ">"
+menuitem = Leaf "menuitem" "<menuitem" ">" ()
 {-# INLINE menuitem #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -1301,7 +1301,7 @@
 -- > <meta />
 --
 meta :: Html  -- ^ Resulting HTML.
-meta = Leaf "meta" "<meta" ">"
+meta = Leaf "meta" "<meta" ">" ()
 {-# INLINE meta #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -1480,7 +1480,7 @@
 -- > <param />
 --
 param :: Html  -- ^ Resulting HTML.
-param = Leaf "param" "<param" ">"
+param = Leaf "param" "<param" ">" ()
 {-# INLINE param #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -1695,7 +1695,7 @@
 -- > <source />
 --
 source :: Html  -- ^ Resulting HTML.
-source = Leaf "source" "<source" ">"
+source = Leaf "source" "<source" ">" ()
 {-# INLINE source #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -2000,7 +2000,7 @@
 -- > <track />
 --
 track :: Html  -- ^ Resulting HTML.
-track = Leaf "track" "<track" ">"
+track = Leaf "track" "<track" ">" ()
 {-# INLINE track #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -2071,5 +2071,5 @@
 -- > <wbr />
 --
 wbr :: Html  -- ^ Resulting HTML.
-wbr = Leaf "wbr" "<wbr" ">"
+wbr = Leaf "wbr" "<wbr" ">" ()
 {-# INLINE wbr #-}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/blaze-html-0.8.1.3/src/Text/Blaze/XHtml1/FrameSet.hs 
new/blaze-html-0.9.0.1/src/Text/Blaze/XHtml1/FrameSet.hs
--- old/blaze-html-0.8.1.3/src/Text/Blaze/XHtml1/FrameSet.hs    2016-11-28 
11:32:14.000000000 +0100
+++ new/blaze-html-0.9.0.1/src/Text/Blaze/XHtml1/FrameSet.hs    2017-01-30 
17:56:16.000000000 +0100
@@ -252,7 +252,7 @@
 -- > <area />
 --
 area :: Html  -- ^ Resulting HTML.
-area = Leaf "area" "<area" " />"
+area = Leaf "area" "<area" " />" ()
 {-# INLINE area #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -287,7 +287,7 @@
 -- > <basefont />
 --
 basefont :: Html  -- ^ Resulting HTML.
-basefont = Leaf "basefont" "<basefont" " />"
+basefont = Leaf "basefont" "<basefont" " />" ()
 {-# INLINE basefont #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -376,7 +376,7 @@
 -- > <br />
 --
 br :: Html  -- ^ Resulting HTML.
-br = Leaf "br" "<br" " />"
+br = Leaf "br" "<br" " />" ()
 {-# INLINE br #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -483,7 +483,7 @@
 -- > <col />
 --
 col :: Html  -- ^ Resulting HTML.
-col = Leaf "col" "<col" " />"
+col = Leaf "col" "<col" " />" ()
 {-# INLINE col #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -716,7 +716,7 @@
 -- > <frame />
 --
 frame :: Html  -- ^ Resulting HTML.
-frame = Leaf "frame" "<frame" " />"
+frame = Leaf "frame" "<frame" " />" ()
 {-# INLINE frame #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -877,7 +877,7 @@
 -- > <hr />
 --
 hr :: Html  -- ^ Resulting HTML.
-hr = Leaf "hr" "<hr" " />"
+hr = Leaf "hr" "<hr" " />" ()
 {-# INLINE hr #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -948,7 +948,7 @@
 -- > <img />
 --
 img :: Html  -- ^ Resulting HTML.
-img = Leaf "img" "<img" " />"
+img = Leaf "img" "<img" " />" ()
 {-# INLINE img #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -965,7 +965,7 @@
 -- > <input />
 --
 input :: Html  -- ^ Resulting HTML.
-input = Leaf "input" "<input" " />"
+input = Leaf "input" "<input" " />" ()
 {-# INLINE input #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -1090,7 +1090,7 @@
 -- > <link />
 --
 link :: Html  -- ^ Resulting HTML.
-link = Leaf "link" "<link" " />"
+link = Leaf "link" "<link" " />" ()
 {-# INLINE link #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -1143,7 +1143,7 @@
 -- > <meta />
 --
 meta :: Html  -- ^ Resulting HTML.
-meta = Leaf "meta" "<meta" " />"
+meta = Leaf "meta" "<meta" " />" ()
 {-# INLINE meta #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -1286,7 +1286,7 @@
 -- > <param />
 --
 param :: Html  -- ^ Resulting HTML.
-param = Leaf "param" "<param" " />"
+param = Leaf "param" "<param" " />" ()
 {-# INLINE param #-}
 
 -- WARNING: The next block of code was automatically generated by
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/blaze-html-0.8.1.3/src/Text/Blaze/XHtml1/Strict.hs 
new/blaze-html-0.9.0.1/src/Text/Blaze/XHtml1/Strict.hs
--- old/blaze-html-0.8.1.3/src/Text/Blaze/XHtml1/Strict.hs      2016-11-28 
11:32:14.000000000 +0100
+++ new/blaze-html-0.9.0.1/src/Text/Blaze/XHtml1/Strict.hs      2017-01-30 
17:56:16.000000000 +0100
@@ -221,7 +221,7 @@
 -- > <area />
 --
 area :: Html  -- ^ Resulting HTML.
-area = Leaf "area" "<area" " />"
+area = Leaf "area" "<area" " />" ()
 {-# INLINE area #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -328,7 +328,7 @@
 -- > <br />
 --
 br :: Html  -- ^ Resulting HTML.
-br = Leaf "br" "<br" " />"
+br = Leaf "br" "<br" " />" ()
 {-# INLINE br #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -417,7 +417,7 @@
 -- > <col />
 --
 col :: Html  -- ^ Resulting HTML.
-col = Leaf "col" "<col" " />"
+col = Leaf "col" "<col" " />" ()
 {-# INLINE col #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -740,7 +740,7 @@
 -- > <hr />
 --
 hr :: Html  -- ^ Resulting HTML.
-hr = Leaf "hr" "<hr" " />"
+hr = Leaf "hr" "<hr" " />" ()
 {-# INLINE hr #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -793,7 +793,7 @@
 -- > <img />
 --
 img :: Html  -- ^ Resulting HTML.
-img = Leaf "img" "<img" " />"
+img = Leaf "img" "<img" " />" ()
 {-# INLINE img #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -810,7 +810,7 @@
 -- > <input />
 --
 input :: Html  -- ^ Resulting HTML.
-input = Leaf "input" "<input" " />"
+input = Leaf "input" "<input" " />" ()
 {-# INLINE input #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -917,7 +917,7 @@
 -- > <link />
 --
 link :: Html  -- ^ Resulting HTML.
-link = Leaf "link" "<link" " />"
+link = Leaf "link" "<link" " />" ()
 {-# INLINE link #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -952,7 +952,7 @@
 -- > <meta />
 --
 meta :: Html  -- ^ Resulting HTML.
-meta = Leaf "meta" "<meta" " />"
+meta = Leaf "meta" "<meta" " />" ()
 {-# INLINE meta #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -1077,7 +1077,7 @@
 -- > <param />
 --
 param :: Html  -- ^ Resulting HTML.
-param = Leaf "param" "<param" " />"
+param = Leaf "param" "<param" " />" ()
 {-# INLINE param #-}
 
 -- WARNING: The next block of code was automatically generated by
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/blaze-html-0.8.1.3/src/Text/Blaze/XHtml1/Transitional.hs 
new/blaze-html-0.9.0.1/src/Text/Blaze/XHtml1/Transitional.hs
--- old/blaze-html-0.8.1.3/src/Text/Blaze/XHtml1/Transitional.hs        
2016-11-28 11:32:14.000000000 +0100
+++ new/blaze-html-0.9.0.1/src/Text/Blaze/XHtml1/Transitional.hs        
2017-01-30 17:56:16.000000000 +0100
@@ -250,7 +250,7 @@
 -- > <area />
 --
 area :: Html  -- ^ Resulting HTML.
-area = Leaf "area" "<area" " />"
+area = Leaf "area" "<area" " />" ()
 {-# INLINE area #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -285,7 +285,7 @@
 -- > <basefont />
 --
 basefont :: Html  -- ^ Resulting HTML.
-basefont = Leaf "basefont" "<basefont" " />"
+basefont = Leaf "basefont" "<basefont" " />" ()
 {-# INLINE basefont #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -374,7 +374,7 @@
 -- > <br />
 --
 br :: Html  -- ^ Resulting HTML.
-br = Leaf "br" "<br" " />"
+br = Leaf "br" "<br" " />" ()
 {-# INLINE br #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -481,7 +481,7 @@
 -- > <col />
 --
 col :: Html  -- ^ Resulting HTML.
-col = Leaf "col" "<col" " />"
+col = Leaf "col" "<col" " />" ()
 {-# INLINE col #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -840,7 +840,7 @@
 -- > <hr />
 --
 hr :: Html  -- ^ Resulting HTML.
-hr = Leaf "hr" "<hr" " />"
+hr = Leaf "hr" "<hr" " />" ()
 {-# INLINE hr #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -911,7 +911,7 @@
 -- > <img />
 --
 img :: Html  -- ^ Resulting HTML.
-img = Leaf "img" "<img" " />"
+img = Leaf "img" "<img" " />" ()
 {-# INLINE img #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -928,7 +928,7 @@
 -- > <input />
 --
 input :: Html  -- ^ Resulting HTML.
-input = Leaf "input" "<input" " />"
+input = Leaf "input" "<input" " />" ()
 {-# INLINE input #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -1053,7 +1053,7 @@
 -- > <link />
 --
 link :: Html  -- ^ Resulting HTML.
-link = Leaf "link" "<link" " />"
+link = Leaf "link" "<link" " />" ()
 {-# INLINE link #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -1106,7 +1106,7 @@
 -- > <meta />
 --
 meta :: Html  -- ^ Resulting HTML.
-meta = Leaf "meta" "<meta" " />"
+meta = Leaf "meta" "<meta" " />" ()
 {-# INLINE meta #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -1249,7 +1249,7 @@
 -- > <param />
 --
 param :: Html  -- ^ Resulting HTML.
-param = Leaf "param" "<param" " />"
+param = Leaf "param" "<param" " />" ()
 {-# INLINE param #-}
 
 -- WARNING: The next block of code was automatically generated by
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/blaze-html-0.8.1.3/src/Text/Blaze/XHtml5.hs 
new/blaze-html-0.9.0.1/src/Text/Blaze/XHtml5.hs
--- old/blaze-html-0.8.1.3/src/Text/Blaze/XHtml5.hs     2016-11-28 
11:32:14.000000000 +0100
+++ new/blaze-html-0.9.0.1/src/Text/Blaze/XHtml5.hs     2017-01-30 
17:56:16.000000000 +0100
@@ -232,7 +232,7 @@
 -- > <area />
 --
 area :: Html  -- ^ Resulting HTML.
-area = Leaf "area" "<area" " />"
+area = Leaf "area" "<area" " />" ()
 {-# INLINE area #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -321,7 +321,7 @@
 -- > <base />
 --
 base :: Html  -- ^ Resulting HTML.
-base = Leaf "base" "<base" " />"
+base = Leaf "base" "<base" " />" ()
 {-# INLINE base #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -392,7 +392,7 @@
 -- > <br />
 --
 br :: Html  -- ^ Resulting HTML.
-br = Leaf "br" "<br" " />"
+br = Leaf "br" "<br" " />" ()
 {-# INLINE br #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -499,7 +499,7 @@
 -- > <col />
 --
 col :: Html  -- ^ Resulting HTML.
-col = Leaf "col" "<col" " />"
+col = Leaf "col" "<col" " />" ()
 {-# INLINE col #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -714,7 +714,7 @@
 -- > <embed />
 --
 embed :: Html  -- ^ Resulting HTML.
-embed = Leaf "embed" "<embed" " />"
+embed = Leaf "embed" "<embed" " />" ()
 {-# INLINE embed #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -983,7 +983,7 @@
 -- > <hr />
 --
 hr :: Html  -- ^ Resulting HTML.
-hr = Leaf "hr" "<hr" " />"
+hr = Leaf "hr" "<hr" " />" ()
 {-# INLINE hr #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -1054,7 +1054,7 @@
 -- > <img />
 --
 img :: Html  -- ^ Resulting HTML.
-img = Leaf "img" "<img" " />"
+img = Leaf "img" "<img" " />" ()
 {-# INLINE img #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -1071,7 +1071,7 @@
 -- > <input />
 --
 input :: Html  -- ^ Resulting HTML.
-input = Leaf "input" "<input" " />"
+input = Leaf "input" "<input" " />" ()
 {-# INLINE input #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -1124,7 +1124,7 @@
 -- > <keygen />
 --
 keygen :: Html  -- ^ Resulting HTML.
-keygen = Leaf "keygen" "<keygen" " />"
+keygen = Leaf "keygen" "<keygen" " />" ()
 {-# INLINE keygen #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -1195,7 +1195,7 @@
 -- > <link />
 --
 link :: Html  -- ^ Resulting HTML.
-link = Leaf "link" "<link" " />"
+link = Leaf "link" "<link" " />" ()
 {-# INLINE link #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -1284,7 +1284,7 @@
 -- > <menuitem />
 --
 menuitem :: Html  -- ^ Resulting HTML.
-menuitem = Leaf "menuitem" "<menuitem" " />"
+menuitem = Leaf "menuitem" "<menuitem" " />" ()
 {-# INLINE menuitem #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -1301,7 +1301,7 @@
 -- > <meta />
 --
 meta :: Html  -- ^ Resulting HTML.
-meta = Leaf "meta" "<meta" " />"
+meta = Leaf "meta" "<meta" " />" ()
 {-# INLINE meta #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -1480,7 +1480,7 @@
 -- > <param />
 --
 param :: Html  -- ^ Resulting HTML.
-param = Leaf "param" "<param" " />"
+param = Leaf "param" "<param" " />" ()
 {-# INLINE param #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -1695,7 +1695,7 @@
 -- > <source />
 --
 source :: Html  -- ^ Resulting HTML.
-source = Leaf "source" "<source" " />"
+source = Leaf "source" "<source" " />" ()
 {-# INLINE source #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -2000,7 +2000,7 @@
 -- > <track />
 --
 track :: Html  -- ^ Resulting HTML.
-track = Leaf "track" "<track" " />"
+track = Leaf "track" "<track" " />" ()
 {-# INLINE track #-}
 
 -- WARNING: The next block of code was automatically generated by
@@ -2071,5 +2071,5 @@
 -- > <wbr />
 --
 wbr :: Html  -- ^ Resulting HTML.
-wbr = Leaf "wbr" "<wbr" " />"
+wbr = Leaf "wbr" "<wbr" " />" ()
 {-# INLINE wbr #-}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/blaze-html-0.8.1.3/src/Util/GenerateHtmlCombinators.hs 
new/blaze-html-0.9.0.1/src/Util/GenerateHtmlCombinators.hs
--- old/blaze-html-0.8.1.3/src/Util/GenerateHtmlCombinators.hs  2016-11-28 
11:32:14.000000000 +0100
+++ new/blaze-html-0.9.0.1/src/Util/GenerateHtmlCombinators.hs  2017-01-30 
17:56:16.000000000 +0100
@@ -236,7 +236,7 @@
     , "--"
     , function ++ " :: Html  -- ^ Resulting HTML."
     , function ++ " = Leaf \"" ++ tag ++ "\" \"<" ++ tag ++ "\" " ++ "\""
-               ++ (if closing then " /" else "") ++ ">\""
+               ++ (if closing then " /" else "") ++ ">\" ()"
     , "{-# INLINE " ++ function ++ " #-}"
     ]
   where


Reply via email to