diff options
| author |  Joey Hess <joey@kitenet.net> | 2012-10-18 14:55:59 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2012-10-18 15:07:11 -0400 |
| commit | b9138b54db85610ce16d31ef1d1e74c18ee25b87 (patch) | |
| tree | f98729b435cf14cbf18f3011ae4de01b4eb4fb03 /Command/Drop.hs | |
| parent | 3e657d3db6bc65ab09343eb019ce5bf73666213e (diff) | |
drop unwanted content in the transfer scan
This was complicated quite a bit by needing to check numcopies. I optimised
that, so it only looks up numcopies once per file, no matter how many
remotes it checks to drop from. Although it did just occur to me that
it might be better to first check if it wants to drop content, and only
then check numcopies..
Diffstat (limited to 'Command/Drop.hs')
| -rw-r--r-- | Command/Drop.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Command/Drop.hs b/Command/Drop.hs index 26e80f8e5..9e58701db 100644 --- a/Command/Drop.hs +++ b/Command/Drop.hs @@ -48,7 +48,7 @@ startLocal file numcopies key = stopUnless (inAnnex key) $ do startRemote :: FilePath -> Maybe Int -> Key -> Remote -> CommandStart startRemote file numcopies key remote = do - showStart "drop" file + showStart ("drop " ++ Remote.name remote) file next $ performRemote key numcopies remote performLocal :: Key -> Maybe Int -> CommandPerform |