fix behavior of copy --from --to

Sponsored-by: Dartmouth College's DANDI project
This commit is contained in:
Joey Hess 2023-01-23 17:53:57 -04:00
parent 3585481470
commit 77266e46dd
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38
2 changed files with 8 additions and 5 deletions

View file

@ -432,9 +432,10 @@ fromToPerform src dest removewhen key afile = do
todest mcontentlock removewhen' = toPerform' mcontentlock dest removewhen' key afile False
dropfromsrc adjusttocheck =
logMove (Remote.uuid src) (Remote.uuid dest) True key $ \deststartedwithcopy ->
dropfromsrc adjusttocheck = case removewhen of
RemoveSafe -> logMove (Remote.uuid src) (Remote.uuid dest) True key $ \deststartedwithcopy ->
fromDrop src (Remote.uuid dest) deststartedwithcopy key afile adjusttocheck
RemoveNever -> next (return True)
combinecleanups a b = a >>= \case
Just cleanupa -> b True >>= \case

View file

@ -34,10 +34,12 @@ Paths of files or directories to operate on can be specified.
* `--from=remote1 --to=remote2`
Copy the content of files that are in remote1 to remote2. Does not change
what is stored in the local repository.
Copy the content of files that are in remote1 to remote2.
Note: This may need to store an intermediate copy of the content on disk.
This is implemented by first downloading the content from remote1 to the
local repository (if not already present), then sending it to remote2, and
then deleting the content from the local repository (if it was not present
to start with).
* `--jobs=N` `-JN`