inverted logic

This commit is contained in:
Joey Hess 2012-06-19 09:17:06 -04:00
parent 57cf65eb6d
commit 627504744c

View file

@ -90,7 +90,7 @@ handleAdds st changechan cs
toadd' <- safeToAdd st toadd
unless (null toadd') $ do
added <- filter id <$> forM toadd' add
when (DirWatcher.eventsCoalesce && not (null added)) $
unless (DirWatcher.eventsCoalesce || null added) $
handleAdds st changechan
=<< getChanges changechan
where