summaryrefslogtreecommitdiff
path: root/Command/Map.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Command/Map.hs')
-rw-r--r--Command/Map.hs6
1 files changed, 3 insertions, 3 deletions
diff --git a/Command/Map.hs b/Command/Map.hs
index eb08037c6..ae568f8cc 100644
--- a/Command/Map.hs
+++ b/Command/Map.hs
@@ -224,10 +224,10 @@ tryScan r
(pipedconfig, return Nothing) "configlist" [] []
manualconfiglist = do
gc <- Annex.getRemoteGitConfig r
- sshparams <- Ssh.toRepo NoConsumeStdin r gc [Param sshcmd]
- liftIO $ pipedconfig "ssh" sshparams
+ (sshcmd, sshparams) <- Ssh.toRepo NoConsumeStdin r gc remotecmd
+ liftIO $ pipedconfig sshcmd sshparams
where
- sshcmd = "sh -c " ++ shellEscape
+ remotecmd = "sh -c " ++ shellEscape
(cddir ++ " && " ++ "git config --null --list")
dir = Git.repoPath r
cddir