mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

improve comment

Browse source
This commit is contained in:
Joey Hess 2017-05-11 14:37:24 -04:00
parent 838b55fa39
commit a6416ba232
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38
1 changed files with 3 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

5
Annex/Ssh.hs
View file

@ -158,8 +158,9 @@ portParams :: Maybe Integer -> [CommandParam]
portParams Nothing = [] portParams Nothing = []
portParams (Just port) = [Param "-p", Param $ show port] portParams (Just port) = [Param "-p", Param $ show port]
{- Prepare to use a socket file. Locks a lock file to prevent {- Prepare to use a socket file for ssh connection caching.
- other git-annex processes from stopping the ssh on this socket. -} - Locks a lock file to prevent other git-annex processes from
- stopping the ssh multiplexer on this socket. -}
prepSocket :: FilePath -> Annex () prepSocket :: FilePath -> Annex ()
prepSocket socketfile = do prepSocket socketfile = do
-- If the lock pool is empty, this is the first ssh of this -- If the lock pool is empty, this is the first ssh of this