diff options
| author | Simonas Kazlauskas <git@kazlauskas.me> | 2014-06-26 19:48:58 +0300 |
|---|---|---|
| committer | Simonas Kazlauskas <git@kazlauskas.me> | 2014-06-26 19:48:58 +0300 |
| commit | 261277dfc59ddeb3b228a2a857052c70baffbeaf (patch) | |
| tree | c300f93108210e4efaf6484491b0395e7269f8a8 /src/Hakyll/Web/Html.hs | |
| parent | e6918c72536ca06d0394549f4bcc048c19aef876 (diff) | |
| download | hakyll-261277dfc59ddeb3b228a2a857052c70baffbeaf.tar.gz | |
Fix build failure introduced by 3ee6f28
Fixes #270
Diffstat (limited to 'src/Hakyll/Web/Html.hs')
| -rw-r--r-- | src/Hakyll/Web/Html.hs | 2 |
1 files changed, 1 insertions, 1 deletions
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 |