summary refs log tree commit diff
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2014-03-01 12:15:47 +0100
committerLudovic Courtès <ludo@gnu.org>2014-03-01 12:15:47 +0100
commitaedbf9b8730b99790a49e3a01fbd59388fcc0c93 (patch)
treec6d314f62e8559a6770d3ccd894b116299faffa0
parent165f4b2add7f292877d67d58c9f6cf9d1c137e70 (diff)
downloadguix-aedbf9b8730b99790a49e3a01fbd59388fcc0c93.tar.gz
offload: 'remote-pipe' uses the right SSH key.
* guix/scripts/offload.scm (remote-pipe): Pass -i when invoking
  %LSHG-COMMAND.
-rw-r--r--guix/scripts/offload.scm4
1 files changed, 4 insertions, 0 deletions
diff --git a/guix/scripts/offload.scm b/guix/scripts/offload.scm
index e48e31547a..5b971302f3 100644
--- a/guix/scripts/offload.scm
+++ b/guix/scripts/offload.scm
@@ -161,6 +161,10 @@ running lsh gateway upon success, or #f on failure."
     (lambda ()
       (apply open-pipe* mode %lshg-command
              "-l" (build-machine-user machine) "-z"
+
+             ;; XXX: Remove '-i' when %LSHG-COMMAND really is lshg.
+             "-i" (build-machine-private-key machine)
+
              (build-machine-name machine)
              command))
     (lambda args