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

inverted logic

Browse source
This commit is contained in:
Joey Hess 2013-11-13 14:41:32 -04:00
parent eab4470440
commit 6a45f4cdaf
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
Assistant/Threads/SanityChecker.hs
View file

@ -40,7 +40,7 @@ sanityCheckerStartupThread startupdelay = namedThreadUnchecked "SanityCheckerSta
{- A corrupt index file can prevent the assistant from working at {- A corrupt index file can prevent the assistant from working at
- all, so detect and repair. -} - all, so detect and repair. -}
ifM (liftAnnex $ inRepo $ checkIndex S.empty) ifM (not <$> liftAnnex (inRepo (checkIndex S.empty)))
( do ( do
debug ["corrupt index file found at startup; removing and restaging"] debug ["corrupt index file found at startup; removing and restaging"]
liftAnnex $ inRepo nukeIndex liftAnnex $ inRepo nukeIndex