diff options
| author |  Joey Hess <joeyh@joeyh.name> | 2015-11-10 13:59:04 -0400 |
|---|---|---|
| committer | Joey Hess <joeyh@joeyh.name> | 2015-11-10 13:59:04 -0400 |
| commit | 80e731707ebae19db26065a1b05ac5f1cfd0e6a1 (patch) | |
| tree | 19b379a7ca75d3234c0293fc37f4951a141cfd01 /Command/Fsck.hs | |
| parent | 847f21e8df109a34dd3747636244943ef3d23bfc (diff) | |
fsck: When fscking a dead repo, avoid incorrect "fixing location log" message.
keyLocations doesn't return locations in dead repos, but if we're fscking a
dead repo, we want to look at what locations are actually logged for it.
Diffstat (limited to 'Command/Fsck.hs')
| -rw-r--r-- | Command/Fsck.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Command/Fsck.hs b/Command/Fsck.hs index 0e0d37acf..5561f9160 100644 --- a/Command/Fsck.hs +++ b/Command/Fsck.hs @@ -235,7 +235,7 @@ verifyLocationLogRemote key desc remote present = verifyLocationLog' :: Key -> String -> Bool -> UUID -> (LogStatus -> Annex ()) -> Annex Bool verifyLocationLog' key desc present u updatestatus = do - uuids <- Remote.keyLocations key + uuids <- loggedLocations key case (present, u `elem` uuids) of (True, False) -> do fix InfoPresent |