mirror of
https://gitlab.com/xonotic/xonotic
synced 2024-12-14 02:45:23 +00:00
12 lines
455 B
Perl
12 lines
455 B
Perl
sub out($$@);
|
|
# chat: IRC channel -> Xonotic server, nick change
|
|
[ irc => q{:([^! ]*)![^ ]* (?i:NICK) :(.*)} => sub {
|
|
my ($nick, $newnick) = @_;
|
|
$nick = color_dpfix $nick;
|
|
# allow the nickname to contain colors in DP format! Therefore, NO color_irc2dp on the nickname!
|
|
$newnick = color_irc2dp $newnick;
|
|
$newnick =~ s/(["\\])/\\$1/g;
|
|
out dp => 0, "rcon2irc_say_as \"* $nick on IRC\" \"is now known as $newnick\"";
|
|
return 0;
|
|
} ],
|