summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJasper Van der Jeugt <jaspervdj@gmail.com>2010-01-18 19:32:06 +0100
committerJasper Van der Jeugt <jaspervdj@gmail.com>2010-01-18 19:32:06 +0100
commit597116a87d795eb26fc92bdd7519556c89c8b11d (patch)
treed6e1ea03a7f8dc8611d39d80e9835f2cbaadae8c
parent06408148eef18707c32cad4d06e293c65962fe5c (diff)
downloadhakyll-597116a87d795eb26fc92bdd7519556c89c8b11d.tar.gz
Added liftIO.
-rw-r--r--src/Text/Hakyll/Page.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Text/Hakyll/Page.hs b/src/Text/Hakyll/Page.hs
index bae7fa6..28d3540 100644
--- a/src/Text/Hakyll/Page.hs
+++ b/src/Text/Hakyll/Page.hs
@@ -133,7 +133,7 @@ readPage pagePath = do
, ("path", pagePath)
] ++ metaData
- seq (($|) id rdeepseq rendered) $ hClose handle
+ seq (($|) id rdeepseq rendered) $ liftIO $ hClose handle
-- Cache if needed
if getFromCache then return () else cachePage page