Observe instead of participating at root.

This commit is contained in:
Tony Garnock-Jones 2013-06-07 11:35:50 -04:00
parent 1f5b8d8251
commit 960ad02762
1 changed files with 1 additions and 1 deletions

View File

@ -1,6 +1,6 @@
#lang marketplace
(subscribe-to-topic (tcp-channel ? (tcp-listener 5999) ?)
(observe-publishers (tcp-channel ? (tcp-listener 5999) ?)
(match-conversation (tcp-channel from to _)
(on-presence (spawn (echoer from to)))))