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

fix inverted logic

Browse source
This commit is contained in:
Joey Hess 2013-02-22 17:01:48 -04:00
parent 17c5a8dae5
commit 08854afa10
2 changed files with 16 additions and 13 deletions
Download patch file Download diff file Expand all files Collapse all files

6
Assistant/Threads/Watcher.hs
View file

@ -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