concat +html

concatHtml :: HTML a => [a] -> Html
html Text.Html