diff options
| -rw-r--r-- | ChangeLog | 2 | ||||
| -rw-r--r-- | tests/session.scm | 2 |
2 files changed, 3 insertions, 1 deletions
@@ -3,6 +3,8 @@ * tests/session.scm ("session?"): New test case. ("comparsion of sessions"): Use one test case instead of two separated TCs (equal?/not equal? test). + ("session-set!, valid values"): Fix bug in TC: try all valid + values for each option, not only the first one. * src/session-type.c (guile_ssh_is_session_p): New procedure. * src/session-type.h (guile_ssh_is_session_p): Export. diff --git a/tests/session.scm b/tests/session.scm index a132001..7e4f17e 100644 --- a/tests/session.scm +++ b/tests/session.scm @@ -53,7 +53,7 @@ (lambda (opt) (for-each (lambda (val) - (session-set! session (car opt) (cadr opt))) + (session-set! session (car opt) val)) (cdr opt))) options) res)) |