diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2014-03-01 12:15:47 +0100 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2014-03-01 12:15:47 +0100 |
| commit | aedbf9b8730b99790a49e3a01fbd59388fcc0c93 (patch) | |
| tree | c6d314f62e8559a6770d3ccd894b116299faffa0 | |
| parent | 165f4b2add7f292877d67d58c9f6cf9d1c137e70 (diff) | |
| download | gnu-guix-aedbf9b8730b99790a49e3a01fbd59388fcc0c93.tar gnu-guix-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.scm | 4 |
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 |