aboutsummaryrefslogtreecommitdiff
path: root/Utility/DirWatcher
diff options
context:
space:
mode:
authorGravatar Joey Hess <joeyh@joeyh.name>2015-08-03 11:27:27 -0400
committerGravatar Joey Hess <joeyh@joeyh.name>2015-08-03 11:27:27 -0400
commit50f5d1a95b4b6fd130f4b7f6a07f51c35907e255 (patch)
treef382ea2170a59c264c90f0e5c9587cbb30a6787d /Utility/DirWatcher
parent4d9725c4be4cf4078201c066a6088c1476072ab3 (diff)
analysis; forwarded
Diffstat (limited to 'Utility/DirWatcher')
-rw-r--r--Utility/DirWatcher/INotify.hs3
1 files changed, 2 insertions, 1 deletions
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