diff options
author | Joey Hess <joey@kitenet.net> | 2012-10-08 17:14:01 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2012-10-08 17:14:01 -0400 |
commit | 5f8d17ef558ee82e4cf9e75b8d750e90d35731ee (patch) | |
tree | 9fe4d61c0713464b7818c4998f5af8f097ae2d48 /Command/Copy.hs | |
parent | 6a885aacfc549c2504ee847ead806b6f10b991bf (diff) |
generalized Annex.Wanted
this should make it easy to use from inside the assistant, where
everything is an AssociatedFile.
Diffstat (limited to 'Command/Copy.hs')
-rw-r--r-- | Command/Copy.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Command/Copy.hs b/Command/Copy.hs index c8a2d7efc..f044facf4 100644 --- a/Command/Copy.hs +++ b/Command/Copy.hs @@ -31,5 +31,5 @@ start to from file (key, backend) = autoCopies file key (<) $ Command.Move.start to from False file (key, backend) where shouldCopy = case to of - Nothing -> checkAuto $ shouldGet file key - Just r -> checkAuto $ shouldSend r file + Nothing -> checkAuto $ wantGet (Just file) + Just r -> checkAuto $ wantSend (Remote.uuid r) (Just file) |