diff options
| author |  Joey Hess <joey@kitenet.net> | 2010-12-29 16:21:38 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2010-12-29 16:21:38 -0400 |
| commit | d475aac37544d9442fe6ca6af5e949fd48d3bc96 (patch) | |
| tree | f1733e539e6b6937b0e119ffd09a4f35a98f0287 /Command | |
| parent | 39d0bcb79332426ac9e20f15614a8eef57a8e7d2 (diff) | |
refactor
Diffstat (limited to 'Command')
| -rw-r--r-- | Command/Move.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Command/Move.hs b/Command/Move.hs index cb6525919..61242955e 100644 --- a/Command/Move.hs +++ b/Command/Move.hs @@ -110,8 +110,8 @@ toCleanup move remote key tmpfile = do fromStart :: Bool -> SubCmdStartString fromStart move file = isAnnexed file $ \(key, _) -> do remote <- Remotes.commandLineRemote - l <- Remotes.keyPossibilities key - if null $ filter (\r -> Remotes.same r remote) l + (trusted, untrusted) <- Remotes.keyPossibilities key + if null $ filter (\r -> Remotes.same r remote) (trusted ++ untrusted) then return Nothing else do showAction move file |