diff options
| author |  Joey Hess <joey@kitenet.net> | 2012-04-21 14:06:36 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2012-04-21 15:36:52 -0400 |
| commit | b4a5e39ee62020380fc0dcf7aecaaf593d44dba5 (patch) | |
| tree | a1568a517e886440a8321472a1aeac8cb517f6ea /Command/Fsck.hs | |
| parent | 10d3e9162624cec5ef60e175cbf33b62f1efe90b (diff) | |
Support git's core.sharedRepository configuration
This is incomplete, it does not honor it yet for hash directories
and other annex bookkeeping files. Some of that is not needed for a bare
repo; some of it may be.
Diffstat (limited to 'Command/Fsck.hs')
| -rw-r--r-- | Command/Fsck.hs | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/Command/Fsck.hs b/Command/Fsck.hs index dac3bfac9..c60101fc7 100644 --- a/Command/Fsck.hs +++ b/Command/Fsck.hs @@ -166,10 +166,9 @@ verifyLocationLog key desc = do -- Since we're checking that a key's file is present, throw -- in a permission fixup here too. when present $ do - f <- inRepo $ gitAnnexLocation key - liftIO $ do - preventWrite f - preventWrite (parentDir f) + file <- inRepo $ gitAnnexLocation key + freezeContent file + freezeContentDir file u <- getUUID verifyLocationLog' key desc present u (logChange key u) |