offload: 'remote-pipe' uses the right SSH key.
* guix/scripts/offload.scm (remote-pipe): Pass -i when invoking %LSHG-COMMAND.
This commit is contained in:
parent
165f4b2add
commit
aedbf9b873
|
@ -161,6 +161,10 @@ running lsh gateway upon success, or #f on failure."
|
||||||
(lambda ()
|
(lambda ()
|
||||||
(apply open-pipe* mode %lshg-command
|
(apply open-pipe* mode %lshg-command
|
||||||
"-l" (build-machine-user machine) "-z"
|
"-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)
|
(build-machine-name machine)
|
||||||
command))
|
command))
|
||||||
(lambda args
|
(lambda args
|
||||||
|
|
Loading…
Reference in New Issue