This commit is contained in:
Joey Hess 2012-07-17 18:36:51 -04:00
parent 62a35162a0
commit fb85d8e563

View file

@ -240,9 +240,9 @@ runHooks kq hooks = do
forM_ changes $ dispatch (kqueueMap q')
loop q'
dispatch dirmap change@(Deleted _) =
dispatch _ change@(Deleted _) =
callhook delHook Nothing change
dispatch dirmap change@(DeletedDir _) =
dispatch _ change@(DeletedDir _) =
callhook delDirHook Nothing change
dispatch dirmap change@(Added _) =
withstatus change $ dispatchadd dirmap