-(define-method (handle-line (irc-bot <irc-bot>) username channel-name
- line-text emote?)
- (echo-message irc-bot username channel-name line-text emote?))
+(define-method (handle-line (irc-bot <irc-bot>) message
+ username channel-name line-text emote?)
+ (echo-message irc-bot username channel-name line-text emote?
+ #:port (current-error-port)))