summaryrefslogtreecommitdiff
path: root/Command/Copy.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Command/Copy.hs')
-rw-r--r--Command/Copy.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/Command/Copy.hs b/Command/Copy.hs
index 395992ed0..e2bd1fce4 100644
--- a/Command/Copy.hs
+++ b/Command/Copy.hs
@@ -37,5 +37,5 @@ start to from file (key, backend) = stopUnless shouldCopy $
where
shouldCopy = checkAuto (check <||> numCopiesCheck file key (<))
check = case to of
- Nothing -> wantGet False (Just file)
- Just r -> wantSend False (Just file) (Remote.uuid r)
+ Nothing -> wantGet False (Just key) (Just file)
+ Just r -> wantSend False (Just key) (Just file) (Remote.uuid r)