diff options
Diffstat (limited to 'src/Text/Hakyll/Render')
| -rw-r--r-- | src/Text/Hakyll/Render/Internal.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Hakyll/Render/Internal.hs b/src/Text/Hakyll/Render/Internal.hs index e6379bd..e296dd2 100644 --- a/src/Text/Hakyll/Render/Internal.hs +++ b/src/Text/Hakyll/Render/Internal.hs @@ -87,7 +87,7 @@ writePage page = do globalContext <- liftM hakyllGlobalContext ask let destination = toDestination url context = (M.singleton "root" $ toRoot url) `M.union` globalContext - liftIO $ makeDirectories destination + makeDirectories destination -- Substitute $root here, just before writing. liftIO $ writeFile destination $ finalSubstitute (getBody page) context where |