summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJasper Van der Jeugt <jaspervdj@gmail.com>2013-05-05 04:50:55 -0700
committerJasper Van der Jeugt <jaspervdj@gmail.com>2013-05-05 04:50:55 -0700
commit696daa17b2195503124dd023917f8209e86c9a33 (patch)
treeeff7d1c8eae63abf436dae291e22c5d4c63b5ee8
parent5a1692a0dffef1d5dfde64a32c6c968e12c9f71b (diff)
parent946723dc9dd2f4f16f89e0077193544cda6e5b6e (diff)
downloadhakyll-696daa17b2195503124dd023917f8209e86c9a33.tar.gz
Merge pull request #146 from sphynx/master
Logged dependency tracking.
-rw-r--r--src/Hakyll/Core/Compiler/Internal.hs6
1 files changed, 5 insertions, 1 deletions
diff --git a/src/Hakyll/Core/Compiler/Internal.hs b/src/Hakyll/Core/Compiler/Internal.hs
index 5b3e466..259cd35 100644
--- a/src/Hakyll/Core/Compiler/Internal.hs
+++ b/src/Hakyll/Core/Compiler/Internal.hs
@@ -221,7 +221,11 @@ compilerUnsafeIO io = Compiler $ \_ -> do
--------------------------------------------------------------------------------
compilerTellDependencies :: [Dependency] -> Compiler ()
-compilerTellDependencies ds = compilerTell mempty {compilerDependencies = ds}
+compilerTellDependencies ds = do
+ logger <- compilerLogger <$> compilerAsk
+ forM_ ds $ \d -> compilerUnsafeIO $ Logger.debug logger $
+ "Hakyll.Core.Compiler.Internal: Adding dependency: " ++ show d
+ compilerTell mempty {compilerDependencies = ds}
{-# INLINE compilerTellDependencies #-}