From 50f5d1a95b4b6fd130f4b7f6a07f51c35907e255 Mon Sep 17 00:00:00 2001
From: Joey Hess <joeyh@joeyh.name>
Date: Mon, 3 Aug 2015 11:27:27 -0400
Subject: analysis; forwarded

---
 Utility/DirWatcher/INotify.hs | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'Utility/DirWatcher/INotify.hs')

diff --git a/Utility/DirWatcher/INotify.hs b/Utility/DirWatcher/INotify.hs
index 4d11b95a8..76f8ab890 100644
--- a/Utility/DirWatcher/INotify.hs
+++ b/Utility/DirWatcher/INotify.hs
@@ -102,7 +102,8 @@ watchDir i dir ignored scanevents hooks
 					| Files.isSymbolicLink s -> 
 						when (hashook addSymlinkHook) $
 							runhook addSymlinkHook f ms
-					| Files.isRegularFile s ->
+					| Files.isRegularFile s -> do
+						print ("ADDED")
 						when (hashook addHook) $
 							runhook addHook f ms
 				_ -> noop
-- 
cgit v1.2.3