diff --git a/ssh-session.rkt b/ssh-session.rkt
index 463e28e..a0791ac 100644
--- a/ssh-session.rkt
+++ b/ssh-session.rkt
@@ -750,7 +750,7 @@
 	  SSH_MSG_KEXINIT handle-msg-kexinit))
 
 (define (ssh-session role in out)
-  (define io-room (make-room (gensym 'ssh-session-io-room)))
+  (define io-room (make-room (gensym 'ssh-io-room)))
   (spy-on io-room)
   (define session-room (make-room (gensym 'ssh-session-room)))
   (spy-on session-room)