summaryrefslogtreecommitdiff
path: root/Assistant/Threads
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2013-11-13 14:41:32 -0400
committerGravatar Joey Hess <joey@kitenet.net>2013-11-13 14:41:32 -0400
commit2cc09035b61a1cd7c3a484e6b828b737affa95d3 (patch)
treeb642d89370e827dad72958763599c835a41317a2 /Assistant/Threads
parentae73f85e186a196e341cbc7820f1d47cc0f5700c (diff)
inverted logic
Diffstat (limited to 'Assistant/Threads')
-rw-r--r--Assistant/Threads/SanityChecker.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Assistant/Threads/SanityChecker.hs b/Assistant/Threads/SanityChecker.hs
index b7dd45a21..21ec60ccc 100644
--- a/Assistant/Threads/SanityChecker.hs
+++ b/Assistant/Threads/SanityChecker.hs
@@ -40,7 +40,7 @@ sanityCheckerStartupThread startupdelay = namedThreadUnchecked "SanityCheckerSta
{- A corrupt index file can prevent the assistant from working at
- all, so detect and repair. -}
- ifM (liftAnnex $ inRepo $ checkIndex S.empty)
+ ifM (not <$> liftAnnex (inRepo (checkIndex S.empty)))
( do
debug ["corrupt index file found at startup; removing and restaging"]
liftAnnex $ inRepo nukeIndex