diff options
| author | Artyom V. Poptsov <poptsov.artyom@gmail.com> | 2017-05-21 09:18:07 +0300 |
|---|---|---|
| committer | Artyom V. Poptsov <poptsov.artyom@gmail.com> | 2017-05-21 09:18:07 +0300 |
| commit | ed2fbb2d5d9dd7d3043eacea630724a6c93abbaa (patch) | |
| tree | 000d50f8ce24b94c6a52595664b53e1b3b5afe64 /modules/ssh | |
| parent | NEWS: Bump version to 0.11.1 (diff) | |
| download | guile-ssh-ed2fbb2d5d9dd7d3043eacea630724a6c93abbaa.tar.gz | |
node.scm (node-guile-version): Bugfix
'node-guile-version' would always fail due to a wrong call to 'rexec'
procedure passing it a node object instead of a session object. This patch
fixes the bug.
Reported by Mark H Weaver <mhw@netris.org> and Ludovic Courtès <ludo@gnu.org>:
<https://bugs.gnu.org/26976>
* modules/ssh/dist/node.scm (node-guile-version): Pass node session to a
'rexec' procedure instead of a node object.
* tests/common.scm (start-server/exec): Handle node version requests.
* tests/dist.scm ("node-guile-version, valid response"): New test case.
* NEWS: Update.
Diffstat (limited to 'modules/ssh')
| -rw-r--r-- | modules/ssh/dist/node.scm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/modules/ssh/dist/node.scm b/modules/ssh/dist/node.scm index 9c065c7..163fb72 100644 --- a/modules/ssh/dist/node.scm +++ b/modules/ssh/dist/node.scm @@ -411,7 +411,7 @@ procedure returns the 1st evaluated value if multiple values were returned." "Get Guile version installed on a NODE, return the version string. Return #f if Guile is not installed." (receive (result rc) - (rexec node "which guile > /dev/null && guile --version") + (rexec (node-session node) "which guile > /dev/null && guile --version") (and (zero? rc) (car result)))) |