rpl-welcome

Vocabulary

irc.messages

Definition

USING: irc.messages.base ;

IN: irc.messages

TUPLE: rpl-welcome < irc-message nickname comment ;

Methods

USING: irc.messages irc.messages.base kernel ;

M: rpl-welcome irc-parameter-slots drop { "nickname" } ;


USING: irc.messages irc.messages.base kernel ;

M: rpl-welcome irc-trailing-slot drop "comment" ;


USING: accessors assocs irc.client.base irc.client.internals
irc.messages kernel sequences ;

M: rpl-welcome process-message
    irc> swap nickname>> >>nick t >>is-ready chats>> values
    [ initialize-chat ] each ;