diff options
Diffstat (limited to 'tests/server.scm')
| -rw-r--r-- | tests/server.scm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/tests/server.scm b/tests/server.scm index ee6f124..69d130a 100644 --- a/tests/server.scm +++ b/tests/server.scm @@ -40,7 +40,7 @@ (topdir (getenv "abs_top_srcdir")) (options `((bindaddr "127.0.0.1") (bindport 22) - ;; (hostkey ,(format #f "~a/tests/rsakey" topdir)) + (hostkey "ssh-rsa" "ssh-dss") (rsakey ,(format #f "~a/tests/rsakey" topdir)) (dsakey ,(format #f "~a/tests/dsakey" topdir)) (banner "string") @@ -70,6 +70,7 @@ (let ((server (%make-server)) (options '((bindaddr "I'm not a IP address" 42) (bindport "I'm not a port" -42) + (hostkey "invalid value" 1 'invalid-value) (rsakey "I'm not a RSA key" 42) (dsakey "I'm not a DSA key" 42) (banner 12345) |