aboutsummaryrefslogtreecommitdiff
path: root/Annex/NumCopies.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joeyh@joeyh.name>2015-10-09 16:16:03 -0400
committerGravatar Joey Hess <joeyh@joeyh.name>2015-10-09 16:16:03 -0400
commit59e14fb081908f3d40eac6890cb668c088b86d92 (patch)
tree750482021e4aff738e1b27e37b8101043a41c3f0 /Annex/NumCopies.hs
parente3eb0165dfec73d065b409d14ac83f855384b56b (diff)
also generate a drop safety proof for move --from remote
Diffstat (limited to 'Annex/NumCopies.hs')
-rw-r--r--Annex/NumCopies.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/Annex/NumCopies.hs b/Annex/NumCopies.hs
index 2ddb460fd..64c78fca0 100644
--- a/Annex/NumCopies.hs
+++ b/Annex/NumCopies.hs
@@ -19,7 +19,7 @@ module Annex.NumCopies (
numCopiesCheck',
verifyEnoughCopiesToDrop,
verifiableCopies,
- UnVerifiedCopy,
+ UnVerifiedCopy(..),
) where
import Common.Annex
@@ -115,7 +115,7 @@ verifyEnoughCopiesToDrop
-> [UUID] -- repos to skip considering (generally untrusted remotes)
-> [VerifiedCopy] -- copies already verified to exist
-> [UnVerifiedCopy] -- places to check to see if they have copies
- -> (SafeDropProof -> Annex a) -- action to perform to drop
+ -> (SafeDropProof -> Annex a) -- action to perform the drop
-> Annex a -- action to perform when unable to drop
-> Annex a
verifyEnoughCopiesToDrop nolocmsg key removallock need skip preverified tocheck dropaction nodropaction =