add removeKey action to Remote
Not implemented for any remotes yet; probably the git remote is the only one that will ever implement it.
This commit is contained in:
parent
beedf1da25
commit
b1abe59193
16 changed files with 22 additions and 2 deletions
|
@ -91,7 +91,7 @@ startRemote afile numcopies key remote = do
|
|||
-- Note that lockContentExclusive is called before checking if the key is
|
||||
-- present on enough remotes to allow removal. This avoids a scenario where two
|
||||
-- or more remotes are trying to remove a key at the same time, and each
|
||||
-- see the key is present on the other.
|
||||
-- sees the key is present on the other.
|
||||
performLocal :: Key -> AssociatedFile -> NumCopies -> Maybe Remote -> CommandPerform
|
||||
performLocal key afile numcopies knownpresentremote = lockContentExclusive key $ \contentlock -> do
|
||||
(remotes, trusteduuids) <- Remote.keyPossibilitiesTrusted key
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue