diff --git a/conversation.rkt b/conversation.rkt
index 355d5d3..cfa9bc4 100644
--- a/conversation.rkt
+++ b/conversation.rkt
@@ -110,6 +110,9 @@
 			     ,out-ch ,in-ch ,disconnect-box
 			     ,(current-thread) ,(current-thread-exit-status)))
 
+    (define/public (reply-name)
+      name)
+
     (define/public (connected?)
       connected)