summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJasper Van der Jeugt <jaspervdj@gmail.com>2013-06-17 04:43:06 -0700
committerJasper Van der Jeugt <jaspervdj@gmail.com>2013-06-17 04:43:06 -0700
commita3c4d06ff972cbf7f88a26bb52149c645d72cc28 (patch)
treebd3d0639aa4f6b41e63ebd45fcf6e4c9c71c5314
parent920ddbb3893070bc62907956168c7c740f4ed87a (diff)
parenta1e778d1e56899878f83e52c7de1070bb9d531ab (diff)
downloadhakyll-a3c4d06ff972cbf7f88a26bb52149c645d72cc28.tar.gz
Merge pull request #162 from uu1101/seq-stderr
Deepseq stderr before closing the handle
-rw-r--r--src/Hakyll/Core/UnixFilter.hs2
1 files changed, 2 insertions, 0 deletions
diff --git a/src/Hakyll/Core/UnixFilter.hs b/src/Hakyll/Core/UnixFilter.hs
index e6d4610..34b2ecb 100644
--- a/src/Hakyll/Core/UnixFilter.hs
+++ b/src/Hakyll/Core/UnixFilter.hs
@@ -129,7 +129,9 @@ unixFilterIO writer reader programName args input = do
-- Read from stderr
_ <- forkIO $ do
+ hSetEncoding errh localeEncoding
err <- hGetContents errh
+ _ <- deepseq err (return err)
hClose errh
writeIORef errRef err
putMVar lock ()