From cc1e06c9a5e2ce18c5a001052ffa3af09d212155 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Fri, 22 Feb 2013 17:01:48 -0400 Subject: fix inverted logic --- Assistant/Threads/Watcher.hs | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'Assistant/Threads/Watcher.hs') diff --git a/Assistant/Threads/Watcher.hs b/Assistant/Threads/Watcher.hs index 8c77fa64a..be82a105f 100644 --- a/Assistant/Threads/Watcher.hs +++ b/Assistant/Threads/Watcher.hs @@ -181,11 +181,11 @@ onAddDirect file fs = do v <- liftAnnex $ catKeyFile file case (v, fs) of (Just key, Just filestatus) -> - ifM (liftAnnex $ changedFileStatus key filestatus) - ( do + ifM (liftAnnex $ sameFileStatus key filestatus) + ( noChange + , do liftAnnex $ changedDirect key file pendingAddChange file - , noChange ) _ -> pendingAddChange file -- cgit v1.2.3