01/01: ssh: Honor the SOCKET-NAME argument of connect-to-remote-daemon.

[Maxim Cournoyer]

apteryx pushed a commit to branch master
in repository guix.

commit 2e4d83398b9e0f7c32d2a2f4184a60da0a7819f5
Author: Maxim Cournoyer <address@hidden>
Date:   Mon Nov 5 00:01:47 2018 -0500

    ssh: Honor the SOCKET-NAME argument of connect-to-remote-daemon.
    
    * guix/ssh.scm (connect-to-remote-daemon): Pass the `socket-name' variable 
to
    the `open-connection' call so that it is honored.
---
 guix/ssh.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/guix/ssh.scm b/guix/ssh.scm
index da20d4d..25ec829 100644
--- a/guix/ssh.scm
+++ b/guix/ssh.scm
@@ -161,7 +161,7 @@ Throw an error on failure."
                                     "/var/guix/daemon-socket/socket"))
   "Connect to the remote build daemon listening on SOCKET-NAME over SESSION,
 an SSH session.  Return a <nix-server> object."
-  (open-connection #:port (remote-daemon-channel session)))
+  (open-connection #:port (remote-daemon-channel session socket-name)))
 
 
 (define (store-import-channel session)