work around what is likely a bug in a new version of ssh
This avoids running into it for new setups, but does not transition old setups. Just a quick fix; I hope to get ssh fixed.
This commit is contained in:
parent
fd09798e40
commit
f626d73442
1 changed files with 6 additions and 2 deletions
|
@ -315,10 +315,14 @@ setSshConfig sshdata config = do
|
|||
- to allow unMangleSshHostName to work. Any unusual characters in the
|
||||
- username or directory are url encoded, except using "." rather than "%"
|
||||
- (the latter has special meaning to ssh).
|
||||
-
|
||||
- The mangled hostname is lower-cased because openssh 6.5p1 does not work
|
||||
- if ssh config Host lines contain any upper-case.
|
||||
-}
|
||||
mangleSshHostName :: SshData -> String
|
||||
mangleSshHostName sshdata = "git-annex-" ++ T.unpack (sshHostName sshdata)
|
||||
++ "-" ++ escape extra
|
||||
mangleSshHostName sshdata = map toLower $
|
||||
"git-annex-" ++ T.unpack (sshHostName sshdata)
|
||||
++ "-" ++ escape extra
|
||||
where
|
||||
extra = intercalate "_" $ map T.unpack $ catMaybes
|
||||
[ sshUserName sshdata
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue