mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

fix OSX build warning

Browse source
This commit is contained in:
Joey Hess 2014-12-29 16:38:52 -04:00
parent da1d9d500d
commit 415b2c53ed
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
Utility/DirWatcher/FSEvents.hs
View file

@ -19,9 +19,9 @@ watchDir dir ignored scanevents hooks = do
unlessM fileLevelEventsSupported $
error "Need at least OSX 10.7.0 for file-level FSEvents"
scan dir
eventStreamCreate [dir] 1.0 True True True handle
eventStreamCreate [dir] 1.0 True True True go
where
handle evt
go evt
| ignoredPath ignored (eventPath evt) = noop
| otherwise = do
{- More than one flag may be set, if events occurred