diff options
author | Jasper Van der Jeugt <jaspervdj@gmail.com> | 2010-01-18 19:32:06 +0100 |
---|---|---|
committer | Jasper Van der Jeugt <jaspervdj@gmail.com> | 2010-01-18 19:32:06 +0100 |
commit | 597116a87d795eb26fc92bdd7519556c89c8b11d (patch) | |
tree | d6e1ea03a7f8dc8611d39d80e9835f2cbaadae8c | |
parent | 06408148eef18707c32cad4d06e293c65962fe5c (diff) | |
download | hakyll-597116a87d795eb26fc92bdd7519556c89c8b11d.tar.gz |
Added liftIO.
-rw-r--r-- | src/Text/Hakyll/Page.hs | 2 |
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 |