diff options
| author |  Joey Hess <joey@kitenet.net> | 2013-09-24 13:37:41 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2013-09-24 13:37:41 -0400 |
| commit | a7f9ddb8de7c1e0357046d3dc9efc644bd5fb730 (patch) | |
| tree | c4577129c78f9e2d9e40da67cf8d191b7dfb6b25 /Command/Map.hs | |
| parent | 12a8f2555e1c6d3a8d6ef7d60382265fa5be70b0 (diff) | |
factor out more ssh stuff from git remote
This has the dual benefits of making Remote.Git shorter, and letting
Remote.GCrypt use these utilities.
Diffstat (limited to 'Command/Map.hs')
| -rw-r--r-- | Command/Map.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/Command/Map.hs b/Command/Map.hs index c88520b07..41beb4b92 100644 --- a/Command/Map.hs +++ b/Command/Map.hs @@ -20,7 +20,7 @@ import qualified Annex import Annex.UUID import Logs.UUID import Logs.Trust -import Remote.Helper.Ssh +import qualified Remote.Helper.Ssh as Ssh import qualified Utility.Dot as Dot -- a link from the first repository to the second (its remote) @@ -203,9 +203,9 @@ tryScan r where p = proc cmd $ toCommand params - configlist = onRemote r (pipedconfig, Nothing) "configlist" [] [] + configlist = Ssh.onRemote r (pipedconfig, Nothing) "configlist" [] [] manualconfiglist = do - sshparams <- sshToRepo r [Param sshcmd] + sshparams <- Ssh.toRepo r [Param sshcmd] liftIO $ pipedconfig "ssh" sshparams where sshcmd = cddir ++ " && " ++ |