diff options
| author | Jasper Van der Jeugt <m@jaspervdj.be> | 2012-11-28 10:24:09 +0100 |
|---|---|---|
| committer | Jasper Van der Jeugt <m@jaspervdj.be> | 2012-11-28 10:26:23 +0100 |
| commit | 2caa185504ec697b96b7bf28dd9d15d489777abf (patch) | |
| tree | eb31db743b9d850bd1c0566754cbebdb4521dba0 /src/Hakyll/Web | |
| parent | db45ea9d8cb8fd199de2239b6bc28aff3ad53cce (diff) | |
| download | hakyll-2caa185504ec697b96b7bf28dd9d15d489777abf.tar.gz | |
Minimize <img>, patch by Chris Mears
Conflicts:
tests/Hakyll/Web/Urls/Relativize/Tests.hs
Diffstat (limited to 'src/Hakyll/Web')
| -rw-r--r-- | src/Hakyll/Web/Urls.hs | 3 |
1 files changed, 2 insertions, 1 deletions
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 |