From 946723dc9dd2f4f16f89e0077193544cda6e5b6e Mon Sep 17 00:00:00 2001 From: "Ivan N. Veselov" Date: Sun, 5 May 2013 12:58:31 +0300 Subject: Logged dependencies adding for debugging purposes. --- src/Hakyll/Core/Compiler/Internal.hs | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) (limited to 'src/Hakyll') 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 #-} -- cgit v1.2.3