diff options
author | Joey Hess <joeyh@joeyh.name> | 2015-10-08 14:27:37 -0400 |
---|---|---|
committer | Joey Hess <joeyh@joeyh.name> | 2015-10-08 14:29:35 -0400 |
commit | bab88f3596c570346a3d069af9e3c8ed92e473c9 (patch) | |
tree | 32384db58de249ef11c524446d1e0bf757c5fa10 /Assistant | |
parent | 5434414bff35367aa62a4aaab0c4731a38dbe76e (diff) |
add lockContentShared
Also, rename lockContent to lockContentExclusive
inAnnexSafe should perhaps be eliminated, and instead use
`lockContentShared inAnnex`. However, I'm waiting on that, as there are
only 2 call sites for inAnnexSafe and it's fiddly.
Diffstat (limited to 'Assistant')
-rw-r--r-- | Assistant/Unused.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Assistant/Unused.hs b/Assistant/Unused.hs index 194739367..c71604679 100644 --- a/Assistant/Unused.hs +++ b/Assistant/Unused.hs @@ -77,7 +77,7 @@ expireUnused duration = do forM_ oldkeys $ \k -> do debug ["removing old unused key", key2file k] liftAnnex $ do - lockContent k removeAnnex + lockContentExclusive k removeAnnex logStatus k InfoMissing where boundry = durationToPOSIXTime <$> duration |