blizzard-html 0.2.0.0 → 0.3.0.0

raw patch · 4 files changed

+959/−115 lines, 4 filesPVP ok

version bump matches the API change (PVP)

API changes (from Hackage documentation)

Files

• CHANGELOG.md +4/−0
• blizzard-html.cabal +1/−1
• src/Blizzard/Html.hs +111/−111
• src/Blizzard/Html/Attributes.hs +843/−3

@@ -1,5 +1,9 @@ # Revision history for blizzard-html +## 0.3.0.0 -- 2022-07-22++* Added wrappers around attribute functions.+ ## 0.2.0.0 -- 2022-07-22  * Removed clay.

@@ -19,7 +19,7 @@ name:               blizzard-html stability:          Experimental synopsis:           An HTML renderer for Haskell-version:            0.2.0.0+version:            0.3.0.0   library

@@ -118,446 +118,446 @@  import Text.Blaze.Html (Attribute, Html) -import qualified Text.Blaze.Html5 as H+import qualified Text.Blaze.Html5 as Html  import Blizzard.Internal.Html (documentTag, normalTag, voidTag)   docType :: Html-docType = H.docType+docType = Html.docType   docTypeHtml :: [Html] -> Html-docTypeHtml = documentTag H.docTypeHtml+docTypeHtml = documentTag Html.docTypeHtml   a :: [Attribute] -> [Html] -> Html-a = normalTag H.a+a = normalTag Html.a   abbr :: [Attribute] -> [Html] -> Html-abbr = normalTag H.abbr+abbr = normalTag Html.abbr   address :: [Attribute] -> [Html] -> Html-address = normalTag H.address+address = normalTag Html.address   area :: [Attribute] -> Html-area = voidTag H.area+area = voidTag Html.area   article :: [Attribute] -> [Html] -> Html-article = normalTag H.article+article = normalTag Html.article   aside :: [Attribute] -> [Html] -> Html-aside = normalTag H.aside+aside = normalTag Html.aside   audio :: [Attribute] -> [Html] -> Html-audio = normalTag H.audio+audio = normalTag Html.audio   b :: [Attribute] -> [Html] -> Html-b = normalTag H.b+b = normalTag Html.b   base :: [Attribute] -> Html-base = voidTag H.base+base = voidTag Html.base   bdo :: [Attribute] -> [Html] -> Html-bdo = normalTag H.bdo+bdo = normalTag Html.bdo   blockquote :: [Attribute] -> [Html] -> Html-blockquote = normalTag H.blockquote+blockquote = normalTag Html.blockquote   body :: [Attribute] -> [Html] -> Html-body = normalTag H.body+body = normalTag Html.body   br :: [Attribute] -> Html-br = voidTag H.br+br = voidTag Html.br   button :: [Attribute] -> [Html] -> Html-button = normalTag H.button+button = normalTag Html.button   canvas :: [Attribute] -> [Html] -> Html-canvas = normalTag H.canvas+canvas = normalTag Html.canvas   caption :: [Attribute] -> [Html] -> Html-caption = normalTag H.caption+caption = normalTag Html.caption   cite :: [Attribute] -> [Html] -> Html-cite = normalTag H.cite+cite = normalTag Html.cite   code :: [Attribute] -> [Html] -> Html-code = normalTag H.code+code = normalTag Html.code   col :: [Attribute] -> Html-col = voidTag H.col+col = voidTag Html.col   colgroup :: [Attribute] -> [Html] -> Html-colgroup = normalTag H.colgroup+colgroup = normalTag Html.colgroup   command :: [Attribute] -> [Html] -> Html-command = normalTag H.command+command = normalTag Html.command   datalist :: [Attribute] -> [Html] -> Html-datalist = normalTag H.datalist+datalist = normalTag Html.datalist   dd :: [Attribute] -> [Html] -> Html-dd = normalTag H.dd+dd = normalTag Html.dd   del :: [Attribute] -> [Html] -> Html-del = normalTag H.del+del = normalTag Html.del   details :: [Attribute] -> [Html] -> Html-details = normalTag H.details+details = normalTag Html.details   dfn :: [Attribute] -> [Html] -> Html-dfn = normalTag H.dfn+dfn = normalTag Html.dfn   div :: [Attribute] -> [Html] -> Html-div = normalTag H.div+div = normalTag Html.div   dl :: [Attribute] -> [Html] -> Html-dl = normalTag H.dl+dl = normalTag Html.dl   dt :: [Attribute] -> [Html] -> Html-dt = normalTag H.dt+dt = normalTag Html.dt   em :: [Attribute] -> [Html] -> Html-em = normalTag H.em+em = normalTag Html.em   embed :: [Attribute] -> Html-embed = voidTag H.embed+embed = voidTag Html.embed   fieldset :: [Attribute] -> [Html] -> Html-fieldset = normalTag H.fieldset+fieldset = normalTag Html.fieldset   figcaption :: [Attribute] -> [Html] -> Html-figcaption = normalTag H.figcaption+figcaption = normalTag Html.figcaption   figure :: [Attribute] -> [Html] -> Html-figure = normalTag H.figure+figure = normalTag Html.figure   footer :: [Attribute] -> [Html] -> Html-footer = normalTag H.footer+footer = normalTag Html.footer   form :: [Attribute] -> [Html] -> Html-form = normalTag H.form+form = normalTag Html.form   h1 :: [Attribute] -> [Html] -> Html-h1 = normalTag H.h1+h1 = normalTag Html.h1   h2 :: [Attribute] -> [Html] -> Html-h2 = normalTag H.h2+h2 = normalTag Html.h2   h3 :: [Attribute] -> [Html] -> Html-h3 = normalTag H.h3+h3 = normalTag Html.h3   h4 :: [Attribute] -> [Html] -> Html-h4 = normalTag H.h4+h4 = normalTag Html.h4   h5 :: [Attribute] -> [Html] -> Html-h5 = normalTag H.h5+h5 = normalTag Html.h5   h6 :: [Attribute] -> [Html] -> Html-h6 = normalTag H.h6+h6 = normalTag Html.h6   head :: [Attribute] -> [Html] -> Html-head = normalTag H.head+head = normalTag Html.head   header :: [Attribute] -> [Html] -> Html-header = normalTag H.header+header = normalTag Html.header   hgroup :: [Attribute] -> [Html] -> Html-hgroup = normalTag H.hgroup+hgroup = normalTag Html.hgroup   hr :: [Attribute] -> Html-hr = voidTag H.hr+hr = voidTag Html.hr   html :: [Attribute] -> [Html] -> Html-html = normalTag H.html+html = normalTag Html.html   i :: [Attribute] -> [Html] -> Html-i = normalTag H.i+i = normalTag Html.i   iframe :: [Attribute] -> [Html] -> Html-iframe = normalTag H.iframe+iframe = normalTag Html.iframe   img :: [Attribute] -> Html-img = voidTag H.img+img = voidTag Html.img   input :: [Attribute] -> Html-input = voidTag H.input+input = voidTag Html.input   ins :: [Attribute] -> [Html] -> Html-ins = normalTag H.ins+ins = normalTag Html.ins   kbd :: [Attribute] -> [Html] -> Html-kbd = normalTag H.kbd+kbd = normalTag Html.kbd   keygen :: [Attribute] -> Html-keygen = voidTag H.keygen+keygen = voidTag Html.keygen   label :: [Attribute] -> [Html] -> Html-label = normalTag H.label+label = normalTag Html.label   legend :: [Attribute] -> [Html] -> Html-legend = normalTag H.legend+legend = normalTag Html.legend   li :: [Attribute] -> [Html] -> Html-li = normalTag H.li+li = normalTag Html.li   link :: [Attribute] -> Html-link = voidTag H.link+link = voidTag Html.link   main :: [Attribute] -> [Html] -> Html-main = normalTag H.main+main = normalTag Html.main   map :: [Attribute] -> [Html] -> Html-map = normalTag H.map+map = normalTag Html.map   mark :: [Attribute] -> [Html] -> Html-mark = normalTag H.mark+mark = normalTag Html.mark   menu :: [Attribute] -> [Html] -> Html-menu = normalTag H.menu+menu = normalTag Html.menu   menuitem :: [Attribute] -> Html-menuitem = voidTag H.menuitem+menuitem = voidTag Html.menuitem   meta :: [Attribute] -> Html-meta = voidTag H.meta+meta = voidTag Html.meta   meter :: [Attribute] -> [Html] -> Html-meter = normalTag H.meter+meter = normalTag Html.meter   nav :: [Attribute] -> [Html] -> Html-nav = normalTag H.nav+nav = normalTag Html.nav   noscript :: [Attribute] -> [Html] -> Html-noscript = normalTag H.noscript+noscript = normalTag Html.noscript   object :: [Attribute] -> [Html] -> Html-object = normalTag H.object+object = normalTag Html.object   ol :: [Attribute] -> [Html] -> Html-ol = normalTag H.ol+ol = normalTag Html.ol   optgroup :: [Attribute] -> [Html] -> Html-optgroup = normalTag H.optgroup+optgroup = normalTag Html.optgroup   option :: [Attribute] -> [Html] -> Html-option = normalTag H.option+option = normalTag Html.option   output :: [Attribute] -> [Html] -> Html-output = normalTag H.output+output = normalTag Html.output   p :: [Attribute] -> [Html] -> Html-p = normalTag H.p+p = normalTag Html.p   param :: [Attribute] -> Html-param = voidTag H.param+param = voidTag Html.param   pre :: [Attribute] -> [Html] -> Html-pre = normalTag H.pre+pre = normalTag Html.pre   progress :: [Attribute] -> [Html] -> Html-progress = normalTag H.progress+progress = normalTag Html.progress   q :: [Attribute] -> [Html] -> Html-q = normalTag H.q+q = normalTag Html.q   rp :: [Attribute] -> [Html] -> Html-rp = normalTag H.rp+rp = normalTag Html.rp   rt :: [Attribute] -> [Html] -> Html-rt = normalTag H.rt+rt = normalTag Html.rt   ruby :: [Attribute] -> [Html] -> Html-ruby = normalTag H.ruby+ruby = normalTag Html.ruby   samp :: [Attribute] -> [Html] -> Html-samp = normalTag H.samp+samp = normalTag Html.samp   script :: [Attribute] -> [Html] -> Html-script = normalTag H.script+script = normalTag Html.script   section :: [Attribute] -> [Html] -> Html-section = normalTag H.section+section = normalTag Html.section   select :: [Attribute] -> [Html] -> Html-select = normalTag H.select+select = normalTag Html.select   small :: [Attribute] -> [Html] -> Html-small = normalTag H.small+small = normalTag Html.small   source :: [Attribute] -> Html-source = voidTag H.source+source = voidTag Html.source   span :: [Attribute] -> [Html] -> Html-span = normalTag H.span+span = normalTag Html.span   strong :: [Attribute] -> [Html] -> Html-strong = normalTag H.strong+strong = normalTag Html.strong   style :: [Attribute] -> [Html] -> Html-style = normalTag H.style+style = normalTag Html.style   sub :: [Attribute] -> [Html] -> Html-sub = normalTag H.sub+sub = normalTag Html.sub   summary :: [Attribute] -> [Html] -> Html-summary = normalTag H.summary+summary = normalTag Html.summary   sup :: [Attribute] -> [Html] -> Html-sup = normalTag H.sup+sup = normalTag Html.sup   table :: [Attribute] -> [Html] -> Html-table = normalTag H.table+table = normalTag Html.table   tbody :: [Attribute] -> [Html] -> Html-tbody = normalTag H.tbody+tbody = normalTag Html.tbody   td :: [Attribute] -> [Html] -> Html-td = normalTag H.td+td = normalTag Html.td   textarea :: [Attribute] -> [Html] -> Html-textarea = normalTag H.textarea+textarea = normalTag Html.textarea   tfoot :: [Attribute] -> [Html] -> Html-tfoot = normalTag H.tfoot+tfoot = normalTag Html.tfoot   th :: [Attribute] -> [Html] -> Html-th = normalTag H.th+th = normalTag Html.th   thead :: [Attribute] -> [Html] -> Html-thead = normalTag H.thead+thead = normalTag Html.thead   time :: [Attribute] -> [Html] -> Html-time = normalTag H.time+time = normalTag Html.time   title :: [Attribute] -> [Html] -> Html-title = normalTag H.title+title = normalTag Html.title   tr :: [Attribute] -> [Html] -> Html-tr = normalTag H.tr+tr = normalTag Html.tr   track :: [Attribute] -> Html-track = voidTag H.track+track = voidTag Html.track   u :: [Attribute] -> [Html] -> Html-u = normalTag H.u+u = normalTag Html.u   ul :: [Attribute] -> [Html] -> Html-ul = normalTag H.ul+ul = normalTag Html.ul   var :: [Attribute] -> [Html] -> Html-var = normalTag H.var+var = normalTag Html.var   video :: [Attribute] -> [Html] -> Html-video = normalTag H.video+video = normalTag Html.video   wbr :: [Attribute] -> Html-wbr = voidTag H.wbr+wbr = voidTag Html.wbr

@@ -1,16 +1,856 @@ {-# LANGUAGE NoImplicitPrelude #-}  module Blizzard.Html.Attributes-    ( module Text.Blaze.Html5.Attributes+    ( accept+    , acceptCharset+    , accesskey+    , action+    , alt+    , async+    , autocomplete+    , autofocus+    , autoplay+    , challenge+    , charset+    , checked+    , cite     , css+    , cols+    , colspan+    , content+    , contenteditable+    , contextmenu+    , controls+    , coords+    , data_+    , datetime+    , defer+    , dir+    , disabled+    , draggable+    , enctype+    , for+    , form+    , formaction+    , formenctype+    , formmethod+    , formnovalidate+    , formtarget+    , headers+    , height+    , hidden+    , high+    , href+    , hreflang+    , httpEquiv+    , icon+    , id+    , ismap+    , item+    , itemprop+    , itemscope+    , itemtype+    , keytype+    , label+    , lang+    , list+    , loop+    , low+    , manifest+    , max+    , maxlength+    , media+    , method+    , min+    , multiple+    , name+    , novalidate+    , onbeforeonload+    , onbeforeprint+    , onblur+    , oncanplay+    , oncanplaythrough+    , onchange+    , onclick+    , oncontextmenu+    , ondblclick+    , ondrag+    , ondragend+    , ondragenter+    , ondragleave+    , ondragover+    , ondragstart+    , ondrop+    , ondurationchange+    , onemptied+    , onended+    , onerror+    , onfocus+    , onformchange+    , onforminput+    , onhaschange+    , oninput+    , oninvalid+    , onkeydown+    , onkeyup+    , onload+    , onloadeddata+    , onloadedmetadata+    , onloadstart+    , onmessage+    , onmousedown+    , onmousemove+    , onmouseout+    , onmouseover+    , onmouseup+    , onmousewheel+    , ononline+    , onpagehide+    , onpageshow+    , onpause+    , onplay+    , onplaying+    , onprogress+    , onpropstate+    , onratechange+    , onreadystatechange+    , onredo+    , onresize+    , onscroll+    , onseeked+    , onseeking+    , onselect+    , onstalled+    , onstorage+    , onsubmit+    , onsuspend+    , ontimeupdate+    , onundo+    , onunload+    , onvolumechange+    , onwaiting+    , open+    , optimum+    , pattern+    , ping+    , placeholder+    , preload+    , pubdate+    , radiogroup+    , readonly+    , rel+    , required+    , reversed+    , role+    , rows+    , rowspan+    , sandbox+    , scope+    , scoped+    , seamless+    , selected+    , shape+    , size+    , sizes+    , span+    , spellcheck+    , src+    , srcdoc+    , start+    , step+    , style+    , subject+    , summary+    , tabindex+    , target+    , title+    , type_+    , usemap+    , value+    , width+    , wrap+    , xmlns     ) where   import Data.Text (Text, unwords) import Prelude ((.)) import Text.Blaze.Html5 (Attribute, textValue)-import Text.Blaze.Html5.Attributes +import qualified Text.Blaze.Html5.Attributes as Attr ++accept :: Text -> Attribute+accept = Attr.accept . textValue+++acceptCharset :: Text -> Attribute+acceptCharset = Attr.acceptCharset . textValue+++accesskey :: Text -> Attribute+accesskey = Attr.accesskey . textValue+++action :: Text -> Attribute+action = Attr.action . textValue+++alt :: Text -> Attribute+alt = Attr.alt . textValue+++async :: Text -> Attribute+async = Attr.async . textValue+++autocomplete :: Text -> Attribute+autocomplete = Attr.autocomplete . textValue+++autofocus :: Text -> Attribute+autofocus = Attr.autofocus . textValue+++autoplay :: Text -> Attribute+autoplay = Attr.autoplay . textValue+++challenge :: Text -> Attribute+challenge = Attr.challenge . textValue+++charset :: Text -> Attribute+charset = Attr.charset . textValue+++checked :: Text -> Attribute+checked = Attr.checked . textValue+++cite :: Text -> Attribute+cite = Attr.cite . textValue++ css :: [Text] -> Attribute-css = class_ . textValue . unwords+css = Attr.class_ . textValue . unwords+++cols :: Text -> Attribute+cols = Attr.cols . textValue+++colspan :: Text -> Attribute+colspan = Attr.colspan . textValue+++content :: Text -> Attribute+content = Attr.content . textValue+++contenteditable :: Text -> Attribute+contenteditable = Attr.contenteditable . textValue+++contextmenu :: Text -> Attribute+contextmenu = Attr.contextmenu . textValue+++controls :: Text -> Attribute+controls = Attr.controls . textValue+++coords :: Text -> Attribute+coords = Attr.coords . textValue+++data_ :: Text -> Attribute+data_ = Attr.data_ . textValue+++datetime :: Text -> Attribute+datetime = Attr.datetime . textValue+++defer :: Text -> Attribute+defer = Attr.defer . textValue+++dir :: Text -> Attribute+dir = Attr.dir . textValue+++disabled :: Text -> Attribute+disabled = Attr.disabled . textValue+++draggable :: Text -> Attribute+draggable = Attr.draggable . textValue+++enctype :: Text -> Attribute+enctype = Attr.enctype . textValue+++for :: Text -> Attribute+for = Attr.for . textValue+++form :: Text -> Attribute+form = Attr.form . textValue+++formaction :: Text -> Attribute+formaction = Attr.formaction . textValue+++formenctype :: Text -> Attribute+formenctype = Attr.formenctype . textValue+++formmethod :: Text -> Attribute+formmethod = Attr.formmethod . textValue+++formnovalidate :: Text -> Attribute+formnovalidate = Attr.formnovalidate . textValue+++formtarget :: Text -> Attribute+formtarget = Attr.formtarget . textValue+++headers :: Text -> Attribute+headers = Attr.headers . textValue+++height :: Text -> Attribute+height = Attr.height . textValue+++hidden :: Text -> Attribute+hidden = Attr.hidden . textValue+++high :: Text -> Attribute+high = Attr.high . textValue+++href :: Text -> Attribute+href = Attr.href . textValue+++hreflang :: Text -> Attribute+hreflang = Attr.hreflang . textValue+++httpEquiv :: Text -> Attribute+httpEquiv = Attr.httpEquiv . textValue+++icon :: Text -> Attribute+icon = Attr.icon . textValue+++id :: Text -> Attribute+id = Attr.id . textValue+++ismap :: Text -> Attribute+ismap = Attr.ismap . textValue+++item :: Text -> Attribute+item = Attr.item . textValue+++itemprop :: Text -> Attribute+itemprop = Attr.itemprop . textValue+++itemscope :: Text -> Attribute+itemscope = Attr.itemscope . textValue+++itemtype :: Text -> Attribute+itemtype = Attr.itemtype . textValue+++keytype :: Text -> Attribute+keytype = Attr.keytype . textValue+++label :: Text -> Attribute+label = Attr.label . textValue+++lang :: Text -> Attribute+lang = Attr.lang . textValue+++list :: Text -> Attribute+list = Attr.list . textValue+++loop :: Text -> Attribute+loop = Attr.loop . textValue+++low :: Text -> Attribute+low = Attr.low . textValue+++manifest :: Text -> Attribute+manifest = Attr.manifest . textValue+++max :: Text -> Attribute+max = Attr.max . textValue+++maxlength :: Text -> Attribute+maxlength = Attr.maxlength . textValue+++media :: Text -> Attribute+media = Attr.media . textValue+++method :: Text -> Attribute+method = Attr.method . textValue+++min :: Text -> Attribute+min = Attr.min . textValue+++multiple :: Text -> Attribute+multiple = Attr.multiple . textValue+++name :: Text -> Attribute+name = Attr.name . textValue+++novalidate :: Text -> Attribute+novalidate = Attr.novalidate . textValue+++onbeforeonload :: Text -> Attribute+onbeforeonload = Attr.onbeforeonload . textValue+++onbeforeprint :: Text -> Attribute+onbeforeprint = Attr.onbeforeprint . textValue+++onblur :: Text -> Attribute+onblur = Attr.onblur . textValue+++oncanplay :: Text -> Attribute+oncanplay = Attr.oncanplay . textValue+++oncanplaythrough :: Text -> Attribute+oncanplaythrough = Attr.oncanplaythrough . textValue+++onchange :: Text -> Attribute+onchange = Attr.onchange . textValue+++onclick :: Text -> Attribute+onclick = Attr.onclick . textValue+++oncontextmenu :: Text -> Attribute+oncontextmenu = Attr.oncontextmenu . textValue+++ondblclick :: Text -> Attribute+ondblclick = Attr.ondblclick . textValue+++ondrag :: Text -> Attribute+ondrag = Attr.ondrag . textValue+++ondragend :: Text -> Attribute+ondragend = Attr.ondragend . textValue+++ondragenter :: Text -> Attribute+ondragenter = Attr.ondragenter . textValue+++ondragleave :: Text -> Attribute+ondragleave = Attr.ondragleave . textValue+++ondragover :: Text -> Attribute+ondragover = Attr.ondragover . textValue+++ondragstart :: Text -> Attribute+ondragstart = Attr.ondragstart . textValue+++ondrop :: Text -> Attribute+ondrop = Attr.ondrop . textValue+++ondurationchange :: Text -> Attribute+ondurationchange = Attr.ondurationchange . textValue+++onemptied :: Text -> Attribute+onemptied = Attr.onemptied . textValue+++onended :: Text -> Attribute+onended = Attr.onended . textValue+++onerror :: Text -> Attribute+onerror = Attr.onerror . textValue+++onfocus :: Text -> Attribute+onfocus = Attr.onfocus . textValue+++onformchange :: Text -> Attribute+onformchange = Attr.onformchange . textValue+++onforminput :: Text -> Attribute+onforminput = Attr.onforminput . textValue+++onhaschange :: Text -> Attribute+onhaschange = Attr.onhaschange . textValue+++oninput :: Text -> Attribute+oninput = Attr.oninput . textValue+++oninvalid :: Text -> Attribute+oninvalid = Attr.oninvalid . textValue+++onkeydown :: Text -> Attribute+onkeydown = Attr.onkeydown . textValue+++onkeyup :: Text -> Attribute+onkeyup = Attr.onkeyup . textValue+++onload :: Text -> Attribute+onload = Attr.onload . textValue+++onloadeddata :: Text -> Attribute+onloadeddata = Attr.onloadeddata . textValue+++onloadedmetadata :: Text -> Attribute+onloadedmetadata = Attr.onloadedmetadata . textValue+++onloadstart :: Text -> Attribute+onloadstart = Attr.onloadstart . textValue+++onmessage :: Text -> Attribute+onmessage = Attr.onmessage . textValue+++onmousedown :: Text -> Attribute+onmousedown = Attr.onmousedown . textValue+++onmousemove :: Text -> Attribute+onmousemove = Attr.onmousemove . textValue+++onmouseout :: Text -> Attribute+onmouseout = Attr.onmouseout . textValue+++onmouseover :: Text -> Attribute+onmouseover = Attr.onmouseover . textValue+++onmouseup :: Text -> Attribute+onmouseup = Attr.onmouseup . textValue+++onmousewheel :: Text -> Attribute+onmousewheel = Attr.onmousewheel . textValue+++ononline :: Text -> Attribute+ononline = Attr.ononline . textValue+++onpagehide :: Text -> Attribute+onpagehide = Attr.onpagehide . textValue+++onpageshow :: Text -> Attribute+onpageshow = Attr.onpageshow . textValue+++onpause :: Text -> Attribute+onpause = Attr.onpause . textValue+++onplay :: Text -> Attribute+onplay = Attr.onplay . textValue+++onplaying :: Text -> Attribute+onplaying = Attr.onplaying . textValue+++onprogress :: Text -> Attribute+onprogress = Attr.onprogress . textValue+++onpropstate :: Text -> Attribute+onpropstate = Attr.onpropstate . textValue+++onratechange :: Text -> Attribute+onratechange = Attr.onratechange . textValue+++onreadystatechange :: Text -> Attribute+onreadystatechange = Attr.onreadystatechange . textValue+++onredo :: Text -> Attribute+onredo = Attr.onredo . textValue+++onresize :: Text -> Attribute+onresize = Attr.onresize . textValue+++onscroll :: Text -> Attribute+onscroll = Attr.onscroll . textValue+++onseeked :: Text -> Attribute+onseeked = Attr.onseeked . textValue+++onseeking :: Text -> Attribute+onseeking = Attr.onseeking . textValue+++onselect :: Text -> Attribute+onselect = Attr.onselect . textValue+++onstalled :: Text -> Attribute+onstalled = Attr.onstalled . textValue+++onstorage :: Text -> Attribute+onstorage = Attr.onstorage . textValue+++onsubmit :: Text -> Attribute+onsubmit = Attr.onsubmit . textValue+++onsuspend :: Text -> Attribute+onsuspend = Attr.onsuspend . textValue+++ontimeupdate :: Text -> Attribute+ontimeupdate = Attr.ontimeupdate . textValue+++onundo :: Text -> Attribute+onundo = Attr.onundo . textValue+++onunload :: Text -> Attribute+onunload = Attr.onunload . textValue+++onvolumechange :: Text -> Attribute+onvolumechange = Attr.onvolumechange . textValue+++onwaiting :: Text -> Attribute+onwaiting = Attr.onwaiting . textValue+++open :: Text -> Attribute+open = Attr.open . textValue+++optimum :: Text -> Attribute+optimum = Attr.optimum . textValue+++pattern :: Text -> Attribute+pattern = Attr.pattern . textValue+++ping :: Text -> Attribute+ping = Attr.ping . textValue+++placeholder :: Text -> Attribute+placeholder = Attr.placeholder . textValue+++preload :: Text -> Attribute+preload = Attr.preload . textValue+++pubdate :: Text -> Attribute+pubdate = Attr.pubdate . textValue+++radiogroup :: Text -> Attribute+radiogroup = Attr.radiogroup . textValue+++readonly :: Text -> Attribute+readonly = Attr.readonly . textValue+++rel :: Text -> Attribute+rel = Attr.rel . textValue+++required :: Text -> Attribute+required = Attr.required . textValue+++reversed :: Text -> Attribute+reversed = Attr.reversed . textValue+++role :: Text -> Attribute+role = Attr.role . textValue+++rows :: Text -> Attribute+rows = Attr.rows . textValue+++rowspan :: Text -> Attribute+rowspan = Attr.rowspan . textValue+++sandbox :: Text -> Attribute+sandbox = Attr.sandbox . textValue+++scope :: Text -> Attribute+scope = Attr.scope . textValue+++scoped :: Text -> Attribute+scoped = Attr.scoped . textValue+++seamless :: Text -> Attribute+seamless = Attr.seamless . textValue+++selected :: Text -> Attribute+selected = Attr.selected . textValue+++shape :: Text -> Attribute+shape = Attr.shape . textValue+++size :: Text -> Attribute+size = Attr.size . textValue+++sizes :: Text -> Attribute+sizes = Attr.sizes . textValue+++span :: Text -> Attribute+span = Attr.span . textValue+++spellcheck :: Text -> Attribute+spellcheck = Attr.spellcheck . textValue+++src :: Text -> Attribute+src = Attr.src . textValue+++srcdoc :: Text -> Attribute+srcdoc = Attr.srcdoc . textValue+++start :: Text -> Attribute+start = Attr.start . textValue+++step :: Text -> Attribute+step = Attr.step . textValue+++style :: [Text] -> Attribute+style = Attr.style . textValue . unwords+++subject :: Text -> Attribute+subject = Attr.subject . textValue+++summary :: Text -> Attribute+summary = Attr.summary . textValue+++tabindex :: Text -> Attribute+tabindex = Attr.tabindex . textValue+++target :: Text -> Attribute+target = Attr.target . textValue+++title :: Text -> Attribute+title = Attr.title . textValue+++type_ :: Text -> Attribute+type_ = Attr.type_ . textValue+++usemap :: Text -> Attribute+usemap = Attr.usemap . textValue+++value :: Text -> Attribute+value = Attr.value . textValue+++width :: Text -> Attribute+width = Attr.width . textValue+++wrap :: Text -> Attribute+wrap = Attr.wrap . textValue+++xmlns :: Text -> Attribute+xmlns = Attr.xmlns . textValue