summary refs log tree commit diff
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2021-05-11 12:21:12 +0200
committerLudovic Courtès <ludo@gnu.org>2021-05-11 12:49:53 +0200
commitda28efef36af8925bcd9e40a81cbf552cf8c2d02 (patch)
tree4c6c42745736fe0f2b01aa199d63559bf8723361
parenta232a40b0011ef3200954f0f5e082e9adfeab2e1 (diff)
downloadguix-da28efef36af8925bcd9e40a81cbf552cf8c2d02.tar.gz
ssh: Fix type that broke offloading.
Reported by Simon Streit <simon@netpanic.org>.
Regression introduced in 3270308eebe82075d2f02517c5a2b1599928495c.

* guix/ssh.scm (remote-daemon-channel)[redirect]: Unquote SOCKET-NAME.
-rw-r--r--guix/ssh.scm2
1 files changed, 1 insertions, 1 deletions
diff --git a/guix/ssh.scm b/guix/ssh.scm
index 77a9732ce5..232b6bfe94 100644
--- a/guix/ssh.scm
+++ b/guix/ssh.scm
@@ -268,7 +268,7 @@ EXP never returns or calls 'primitive-exit' when it's done."
 
        ;; Use 'connect-to-daemon' to honor GUIX_DAEMON_SOCKET.
        (let ((sock    (connect-to-daemon (or (getenv "GUIX_DAEMON_SOCKET")
-                                             socket-name)))
+                                             ,socket-name)))
              (stdin   (current-input-port))
              (stdout  (current-output-port))
              (select* (lambda (read write except)