diff options
| author | Jasper Van der Jeugt <m@jaspervdj.be> | 2012-01-19 19:46:06 +0100 |
|---|---|---|
| committer | Jasper Van der Jeugt <m@jaspervdj.be> | 2012-01-19 19:46:06 +0100 |
| commit | b5f864afc00d39f42ba8496a2f81ba5a0e3b2239 (patch) | |
| tree | 4b9630513e3b2bcb80603e8fa5a81afa08903274 /src/Hakyll/Web/Urls/Relativize.hs | |
| parent | dabaa4532b767d5ab10204e6efa6f71c8eb96b7b (diff) | |
| download | hakyll-b5f864afc00d39f42ba8496a2f81ba5a0e3b2239.tar.gz | |
Turn off TagSoup escaping
Diffstat (limited to 'src/Hakyll/Web/Urls/Relativize.hs')
| -rw-r--r-- | src/Hakyll/Web/Urls/Relativize.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Hakyll/Web/Urls/Relativize.hs b/src/Hakyll/Web/Urls/Relativize.hs index c473097..0f833fc 100644 --- a/src/Hakyll/Web/Urls/Relativize.hs +++ b/src/Hakyll/Web/Urls/Relativize.hs @@ -34,7 +34,7 @@ import Hakyll.Web.Urls relativizeUrlsCompiler :: Compiler (Page String) (Page String) relativizeUrlsCompiler = getRoute &&& id >>^ uncurry relativize where - relativize Nothing = id + relativize Nothing = id relativize (Just r) = fmap (relativizeUrls $ toSiteRoot r) -- | Relativize URL's in HTML |