mirror of
https://github.com/pragma-/pbot.git
synced 2024-12-23 19:22:40 +01:00
ChanOpCommands: uppercase kick reason if kick
command is uppercased
This commit is contained in:
parent
be2376cf4b
commit
7e31a3ee26
@ -642,6 +642,10 @@ sub cmd_kick {
|
||||
}
|
||||
}
|
||||
|
||||
if ($context->{keyword} =~ /^[A-Z]+$/) {
|
||||
$reason = uc $reason;
|
||||
}
|
||||
|
||||
my @nicks = split /,/, $victim;
|
||||
foreach my $n (@nicks) {
|
||||
if ($n =~ m/\*/) {
|
||||
|
Loading…
Reference in New Issue
Block a user