summaryrefslogtreecommitdiff
path: root/Command/Move.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Command/Move.hs')
-rw-r--r--Command/Move.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Command/Move.hs b/Command/Move.hs
index 61242955e..eb223f5ab 100644
--- a/Command/Move.hs
+++ b/Command/Move.hs
@@ -110,7 +110,7 @@ toCleanup move remote key tmpfile = do
fromStart :: Bool -> SubCmdStartString
fromStart move file = isAnnexed file $ \(key, _) -> do
remote <- Remotes.commandLineRemote
- (trusted, untrusted) <- Remotes.keyPossibilities key
+ (trusted, untrusted, _) <- Remotes.keyPossibilities key
if null $ filter (\r -> Remotes.same r remote) (trusted ++ untrusted)
then return Nothing
else do