Clean up whitespace

This commit is contained in:
Tony Garnock-Jones 2015-10-09 18:45:30 -04:00
parent 5280f1eb5c
commit a7503d16e4
1 changed files with 1 additions and 1 deletions

View File

@ -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)))))