concat -bytestring +xhtml

concatHtml :: HTML a => [a] -> Html
xhtml Text.XHtml.Strict, xhtml Text.XHtml.Frameset, xhtml Text.XHtml.Transitional