aboutsummaryrefslogtreecommitdiff
path: root/Backend
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2010-10-17 18:52:09 -0400
committerGravatar Joey Hess <joey@kitenet.net>2010-10-17 18:52:09 -0400
commit335c06171ac9a45a76b3b92d647615142bcc6ba0 (patch)
tree138cff5c4acafc75156f526d49b3cbdb52b7fdb7 /Backend
parentbb6707020d08f7509c21c1229088bb6017438caf (diff)
commit logs at end; faster
Diffstat (limited to 'Backend')
-rw-r--r--Backend/File.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/Backend/File.hs b/Backend/File.hs
index f7796532b..9b81bef9a 100644
--- a/Backend/File.hs
+++ b/Backend/File.hs
@@ -116,6 +116,8 @@ checkRemoveKey key = do
then retNotEnoughCopiesKnown remotes numcopies
else findcopies numcopies remotes []
where
+ config = "annex.numcopies"
+
findcopies 0 _ _ = return True -- success, enough copies found
findcopies _ [] bad = notEnoughCopiesSeen bad
findcopies n (r:rs) bad = do
@@ -151,5 +153,3 @@ checkRemoveKey key = do
showLongNote $ "According to the " ++ config ++
" setting, it is not safe to remove it!"
showLongNote "(Use --force to override.)"
-
- config = "annex.numcopies"