Ticket #1161: test.scm

File test.scm, 183 bytes (added by Kooda, 11 years ago)

test case

Line 
1(use irc)
2
3(define con (irc:connection server: "localhost"))
4
5(irc:add-message-handler! con void)
6(irc:add-message-handler! con void tag: 'foo)
7(irc:remove-message-handler! con 'foo)