summaryrefslogtreecommitdiff
path: root/Command/TransferKey.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2013-03-05 15:39:42 -0400
committerGravatar Joey Hess <joey@kitenet.net>2013-03-05 15:43:56 -0400
commit5c46685ab3bc1f579e55d764d5887b7f4a208d65 (patch)
tree7bb19dd15cea25d8c3617e4a3e12e92c1a28ab64 /Command/TransferKey.hs
parent349da7cd84ab7b5d4b602bc3ab51e3a548a1633a (diff)
two types of byName
Clean up from 5123a1a83aa3b954fe67629508bab5ccea0e4148. In some cases, looking up a remote by name even though it has no UUID is desirable. This includes git annex sync, which can operate on remotes without an annex, and XMPP pairing, which runs addRemote (with calls byName) before the UUID of the XMPP remote has been configured in git.
Diffstat (limited to 'Command/TransferKey.hs')
-rw-r--r--Command/TransferKey.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/Command/TransferKey.hs b/Command/TransferKey.hs
index 28ace3cd2..407c1d483 100644
--- a/Command/TransferKey.hs
+++ b/Command/TransferKey.hs
@@ -29,8 +29,8 @@ fileOption :: Option
fileOption = Option.field [] "file" paramFile "the associated file"
seek :: [CommandSeek]
-seek = [withField Command.Move.toOption Remote.byName $ \to ->
- withField Command.Move.fromOption Remote.byName $ \from ->
+seek = [withField Command.Move.toOption Remote.byNameWithUUID $ \to ->
+ withField Command.Move.fromOption Remote.byNameWithUUID $ \from ->
withField fileOption return $ \file ->
withKeys $ start to from file]