summaryrefslogtreecommitdiff
path: root/guix/scripts/offload.scm
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 /guix/scripts/offload.scm
parent165f4b2add7f292877d67d58c9f6cf9d1c137e70 (diff)
offload: 'remote-pipe' uses the right SSH key.
* guix/scripts/offload.scm (remote-pipe): Pass -i when invoking %LSHG-COMMAND.
Diffstat (limited to 'guix/scripts/offload.scm')
-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