copy --auto was checking the wrong repo's preferred content. (--from was checking what --to should, and vice-versa.) Fixed this bug, which was introduced in version 5.20150727.

This commit is contained in:
Joey Hess 2015-10-06 17:29:44 -04:00
parent 6fbabfcf16
commit 1ac79e6fe5
4 changed files with 16 additions and 3 deletions

View file

@ -52,7 +52,7 @@ start o file key = stopUnless shouldCopy $
| autoMode o = want <||> numCopiesCheck file key (<)
| otherwise = return True
want = case Command.Move.fromToOptions (moveOptions o) of
ToRemote _ ->
wantGet False (Just key) (Just file)
FromRemote dest -> (Remote.uuid <$> getParsed dest) >>=
ToRemote dest -> (Remote.uuid <$> getParsed dest) >>=
wantSend False (Just key) (Just file)
FromRemote _ ->
wantGet False (Just key) (Just file)