analysis; forwarded

This commit is contained in:
Joey Hess 2015-08-03 11:27:27 -04:00
parent d82b755a4f
commit d986d24494
2 changed files with 28 additions and 1 deletions

View file

@ -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