diff options
| author |  Joey Hess <joey@kitenet.net> | 2011-06-22 18:32:41 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2011-06-22 18:32:41 -0400 |
| commit | 80302d0b46c5d45df1cf290796e0e27d9264ece8 (patch) | |
| tree | c97312a531f5cf2ef514ddb5224395b614eb2b25 /Command/Fsck.hs | |
| parent | 944c51ba26efc39416c5f148b6ec36151dc7f42e (diff) | |
improve bare repo handing
Many more commands can work in bare repos now, thanks to the git-annex
branch.
Diffstat (limited to 'Command/Fsck.hs')
| -rw-r--r-- | Command/Fsck.hs | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/Command/Fsck.hs b/Command/Fsck.hs index 0e3df03dd..cb062342d 100644 --- a/Command/Fsck.hs +++ b/Command/Fsck.hs @@ -64,11 +64,11 @@ verifyLocationLog key file = do case (present, u `elem` uuids) of (True, False) -> do - fix u ValuePresent + fix g u ValuePresent -- There is no data loss, so do not fail. return True (False, True) -> do - fix u ValueMissing + fix g u ValueMissing warning $ "** Based on the location log, " ++ file ++ "\n** was expected to be present, " ++ @@ -77,6 +77,6 @@ verifyLocationLog key file = do _ -> return True where - fix u s = do + fix g u s = do showNote "fixing location log" - logStatusFor u key s + logChange g key u s |