From 2caa185504ec697b96b7bf28dd9d15d489777abf Mon Sep 17 00:00:00 2001 From: Jasper Van der Jeugt Date: Wed, 28 Nov 2012 10:24:09 +0100 Subject: Minimize , patch by Chris Mears Conflicts: tests/Hakyll/Web/Urls/Relativize/Tests.hs --- src/Hakyll/Web/Urls.hs | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'src/Hakyll/Web') diff --git a/src/Hakyll/Web/Urls.hs b/src/Hakyll/Web/Urls.hs index e89bd08..1cd0816 100644 --- a/src/Hakyll/Web/Urls.hs +++ b/src/Hakyll/Web/Urls.hs @@ -29,7 +29,8 @@ withUrls f = renderTags' . map tag . TS.parseTags -- renderTags' :: [TS.Tag String] -> String renderTags' = TS.renderTagsOptions TS.renderOptions - { TS.optRawTag = (`elem` ["script", "style"]) . map toLower + { TS.optRawTag = (`elem` ["script", "style"]) . map toLower + , TS.optMinimize = (`elem` ["br", "img"]) } -- | Convert a filepath to an URL starting from the site root -- cgit v1.2.3