Ticket #139: irc-receiver.patch
File irc-receiver.patch, 495 bytes (added by , 15 years ago) |
---|
-
irc/trunk/irc.scm
302 302 (or (not receiver) 303 303 (and (pair? params) 304 304 (if (procedure? receiver) 305 (receiver (car params) 306 (string-search receiver (car params))))) )305 (receiver (car params)) 306 (string-search receiver (car params))))) 307 307 (or (not body) 308 308 (if (procedure? body) 309 309 (body msg)