diff options
| author |  Joey Hess <joey@kitenet.net> | 2012-07-17 18:36:51 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2012-07-17 18:36:51 -0400 |
| commit | fb85d8e563d071d7355c2cc7f8fb68860312e616 (patch) | |
| tree | 9c781c3232c92275eee452e992d1f626f14317c0 /Utility/Kqueue.hs | |
| parent | 62a35162a0988f8d6e51796debceafda4d35c061 (diff) | |
cleanup
Diffstat (limited to 'Utility/Kqueue.hs')
| -rw-r--r-- | Utility/Kqueue.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Utility/Kqueue.hs b/Utility/Kqueue.hs index 9013dbe7e..c1a0a5cd6 100644 --- a/Utility/Kqueue.hs +++ b/Utility/Kqueue.hs @@ -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 |