diff options
| author | Artyom Poptsov <poptsov.artyom@gmail.com> | 2014-07-12 21:39:44 +0400 |
|---|---|---|
| committer | Artyom Poptsov <poptsov.artyom@gmail.com> | 2014-07-12 21:39:44 +0400 |
| commit | 35e06ed213d87aa01c6da9e713919dc8c65fbc14 (patch) | |
| tree | cbab96c9f25a7b0e669aefb9b065441ddf235517 /tests/session.scm | |
| parent | ssh/auth.c: Throw `wrong-type-arg' instead of `guile-ssh-error' (diff) | |
| download | guile-ssh-35e06ed213d87aa01c6da9e713919dc8c65fbc14.tar.gz | |
ssh/session-func.c: Handle disconnected sessions
* ssh/session-func.c (guile_ssh_get_protocol_version)
(guile_ssh_authenticate_server, guile_ssh_get_server_public_key)
(guile_ssh_write_known_host): Expect a connected session as an
argument. Throw `wrong-type-arg' if the session is not connected.
* tests/session.scm ("get-protocol-version"): Move with some changes
to `tests/client-server.scm'.
* tests/client-server.scm ("get-protocol-version"): New TC.
* doc/api-sessions.texi (Sessions): Update.
* NEWS: Update.
Diffstat (limited to 'tests/session.scm')
| -rw-r--r-- | tests/session.scm | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/tests/session.scm b/tests/session.scm index 0175ad1..3be2c04 100644 --- a/tests/session.scm +++ b/tests/session.scm @@ -119,10 +119,6 @@ (timeout 15)) (eq? (blocking-flush! session timeout) 'ok))) -(test-assert "get-protocol-version" - (let ((session (%make-session))) - (get-protocol-version session))) - (test-assert "connected?, check that we are not connected" (let ((session (%make-session))) (not (connected? session)))) |