diff --git a/minimart/examples/chat-actor.rkt b/minimart/examples/chat-actor.rkt index 6108b07..fa04d1b 100644 --- a/minimart/examples/chat-actor.rkt +++ b/minimart/examples/chat-actor.rkt @@ -18,7 +18,7 @@ (advertise (tcp-channel us them ?) #:meta-level 1) (subscribe `(,($ who) says ,($ what)) (say who "says: ~a" what)) - + (advertise `(,user says ,?)) (subscribe (tcp-channel them us ($ bs)) #:meta-level 1 (send `(,user says ,(string-trim (bytes->string/utf-8 bs)))))