@@ -77,7 +77,7 @@ withUrls f = withTags tag
77-- | Customized TagSoup renderer. The default TagSoup renderer escape CSS
77-- | Customized TagSoup renderer. The default TagSoup renderer escape CSS
78-- within style tags, and doesn't properly minimize.
78-- within style tags, and doesn't properly minimize.
79renderTags' :: [TS.Tag String] -> String
79renderTags' :: [TS.Tag String] -> String
80−renderTags' = TS.renderTagsOptions TS.renderOptions
80+renderTags' = TS.renderTagsOptions TS.RenderOptions
81 { TS.optRawTag = (`elem` ["script", "style"]) . map toLower
81 { TS.optRawTag = (`elem` ["script", "style"]) . map toLower
82 , TS.optMinimize = (`S.member` minimize) . map toLower
82 , TS.optMinimize = (`S.member` minimize) . map toLower
83 , TS.optEscape = id
83 , TS.optEscape = id