This commit is contained in:
Tony Garnock-Jones 2012-07-04 17:22:25 -04:00
parent a0c60fd8db
commit 3fe3bee397
1 changed files with 2 additions and 1 deletions

View File

@ -60,7 +60,8 @@
(flush-output)
state])
(at-meta-level
(role 'channel-listener (topic-subscriber (channel-message (channel-stream-name #t (wild)) (wild)))
(role 'channel-listener (topic-subscriber (channel-message (channel-stream-name #t (wild))
(wild)))
#:state state
#:topic t
#:on-presence (match t