annotate-message ( chat object -- object )

Vocabulary

irc.client.internals

Inputs

chat	an object
object	an object

Outputs

object

an object

Definition

IN: irc.client.internals

GENERIC: annotate-message ( chat object -- object )

Methods

USING: accessors irc.client.internals irc.messages kernel ;

M: mode annotate-message swap name>> >>name ;


USING: irc.client.internals kernel ;

M: object annotate-message nip ;


USING: accessors irc.client.internals kernel strings ;

M: string annotate-message [ name>> ] dip strings>privmsg ;


USING: accessors irc.client.base irc.client.internals kernel ;

M: to-channel annotate-message swap name>> >>channel ;


USING: accessors irc.client.base irc.client.internals kernel ;

M: to-target annotate-message swap name>> >>target ;