diff options
Diffstat (limited to 'Remote/Helper')
| -rw-r--r-- | Remote/Helper/Ssh.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Remote/Helper/Ssh.hs b/Remote/Helper/Ssh.hs index 2e6b6d57c..f8e9353b7 100644 --- a/Remote/Helper/Ssh.hs +++ b/Remote/Helper/Ssh.hs @@ -22,8 +22,8 @@ sshToRepo :: Git.Repo -> [CommandParam] -> Annex [CommandParam] sshToRepo repo sshcmd = do g <- fromRepo id let c = extractRemoteGitConfig g (Git.repoDescribe repo) - opts = map Param $ remoteAnnexSshOptions c - host = Git.Url.hostuser repo + let opts = map Param $ remoteAnnexSshOptions c + let host = Git.Url.hostuser repo params <- sshCachingOptions (host, Git.Url.port repo) opts return $ params ++ Param host : sshcmd |