add tmp flag parameter to retrieveKeyFile

3 files changed, 3 insertions, 3 deletions

diff --git a/Command/Fsck.hs b/Command/Fsck.hs
index aec29a39b..77e189f43 100644
--- a/Command/Fsck.hs
+++ b/Command/Fsck.hs
@@ -65,7 +65,7 @@ performRemote key file backend numcopies remote = withTmp key $ \tmpfile -> do
 			showNote err
 			stop
 		Right True -> do
-			copied <- Remote.retrieveKeyFile remote key tmpfile
+			copied <- Remote.retrieveKeyFile remote key True tmpfile
 			if copied then go True (Just tmpfile) else go False Nothing
 		Right False -> go False Nothing
 	where
diff --git a/Command/Get.hs b/Command/Get.hs
index 5d032e13c..7f5c08a7e 100644
--- a/Command/Get.hs
+++ b/Command/Get.hs
@@ -72,7 +72,7 @@ getKeyFile key file = do
 				else return True
 		docopy r continue = do
 			showAction $ "from " ++ Remote.name r
-			copied <- Remote.retrieveKeyFile r key file
+			copied <- Remote.retrieveKeyFile r key False file
 			if copied
 				then return True
 				else continue
diff --git a/Command/Move.hs b/Command/Move.hs
index 2f2cd1b5d..003ca27b8 100644
--- a/Command/Move.hs
+++ b/Command/Move.hs
@@ -131,7 +131,7 @@ fromPerform src move key = moveLock move key $ do
 		then handle move True
 		else do
 			showAction $ "from " ++ Remote.name src
-			ok <- getViaTmp key $ Remote.retrieveKeyFile src key
+			ok <- getViaTmp key $ Remote.retrieveKeyFile src key False
 			handle move ok
 	where
 		handle _ False = stop -- failed