get, move, copy, mirror: Added --failed switch which retries failed copies/moves
Note that get --from foo --failed will get things that a previous get --from bar tried and failed to get, etc. I considered making --failed only retry transfers from the same remote, but it was easier, and seems more useful, to not have the same remote requirement. Noisy due to some refactoring into Types/
This commit is contained in:
parent
0fc85c45b5
commit
1a0e2c9901
53 changed files with 254 additions and 127 deletions
|
@ -22,7 +22,7 @@ import Remote.Helper.ReadOnly
|
|||
import Remote.Helper.Messages
|
||||
import Utility.Metered
|
||||
import Messages.Progress
|
||||
import Logs.Transfer
|
||||
import Types.Transfer
|
||||
import Logs.PreferredContent.Raw
|
||||
import Logs.RemoteState
|
||||
import Logs.Web
|
||||
|
|
2
Remote/External/Types.hs
vendored
2
Remote/External/Types.hs
vendored
|
@ -34,7 +34,7 @@ module Remote.External.Types (
|
|||
import Annex.Common
|
||||
import Types.StandardGroups (PreferredContentExpression)
|
||||
import Utility.Metered (BytesProcessed(..))
|
||||
import Logs.Transfer (Direction(..))
|
||||
import Types.Transfer (Direction(..))
|
||||
import Config.Cost (Cost)
|
||||
import Types.Remote (RemoteConfig)
|
||||
import Types.Availability (Availability(..))
|
||||
|
|
|
@ -25,6 +25,7 @@ import Types.Remote
|
|||
import Types.GitConfig
|
||||
import Types.Crypto
|
||||
import Types.Creds
|
||||
import Types.Transfer
|
||||
import qualified Git
|
||||
import qualified Git.Command
|
||||
import qualified Git.Config
|
||||
|
@ -47,7 +48,6 @@ import qualified Remote.Directory
|
|||
import Utility.Rsync
|
||||
import Utility.Tmp
|
||||
import Logs.Remote
|
||||
import Logs.Transfer
|
||||
import Utility.Gpg
|
||||
|
||||
remote :: RemoteType
|
||||
|
|
|
@ -20,7 +20,7 @@ import Messages.Progress
|
|||
import Utility.Metered
|
||||
import Utility.Rsync
|
||||
import Types.Remote
|
||||
import Logs.Transfer
|
||||
import Types.Transfer
|
||||
import Config
|
||||
|
||||
{- Generates parameters to ssh to a repository's host and run a command.
|
||||
|
|
|
@ -34,7 +34,7 @@ import Utility.Rsync
|
|||
import Utility.CopyFile
|
||||
import Messages.Progress
|
||||
import Utility.Metered
|
||||
import Logs.Transfer
|
||||
import Types.Transfer
|
||||
import Types.Creds
|
||||
import Annex.DirHashes
|
||||
import Utility.Tmp
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue