From 261277dfc59ddeb3b228a2a857052c70baffbeaf Mon Sep 17 00:00:00 2001 From: Simonas Kazlauskas Date: Thu, 26 Jun 2014 19:48:58 +0300 Subject: Fix build failure introduced by 3ee6f28 Fixes #270 --- src/Hakyll/Web/Html.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Hakyll/Web/Html.hs b/src/Hakyll/Web/Html.hs index 1abd742..a86ac1e 100644 --- a/src/Hakyll/Web/Html.hs +++ b/src/Hakyll/Web/Html.hs @@ -77,7 +77,7 @@ withUrls f = withTags tag -- | Customized TagSoup renderer. The default TagSoup renderer escape CSS -- within style tags, and doesn't properly minimize. renderTags' :: [TS.Tag String] -> String -renderTags' = TS.renderTagsOptions TS.renderOptions +renderTags' = TS.renderTagsOptions TS.RenderOptions { TS.optRawTag = (`elem` ["script", "style"]) . map toLower , TS.optMinimize = (`S.member` minimize) . map toLower , TS.optEscape = id -- cgit v1.2.3