join-participant ( nick irc-channel-chat -- )

Vocabulary

irc.client.participants

Inputs

nick	an object
irc-channel-chat	an object

Outputs

None

Definition

USING: accessors assocs kernel ;

IN: irc.client.participants

: join-participant ( nick irc-channel-chat -- )
    participants>> [ <participant> dup nick>> ] dip set-at ;