3
0
mirror of https://github.com/pragma-/pbot.git synced 2024-11-19 10:29:30 +01:00

ChanOpCommands: alternate case of kick message if case of kick command is alternated

This commit is contained in:
Pragmatic Software 2020-06-26 17:22:38 -07:00
parent c07da5ccf2
commit 8610a9a7c9

View File

@ -644,6 +644,8 @@ sub cmd_kick {
if ($context->{keyword} =~ /^[A-Z]+$/) { if ($context->{keyword} =~ /^[A-Z]+$/) {
$reason = uc $reason; $reason = uc $reason;
} elsif ($context->{keyword} eq 'KiCk' or $context->{keyword} eq 'kIcK') {
$reason =~ s/(.)(.)/lc($1) . uc($2)/ge;
} }
my @nicks = split /,/, $victim; my @nicks = split /,/, $victim;