1
0
Fork 0
mirror of https://github.com/perlbot/perlbuut synced 2025-06-07 19:05:50 -04:00

Fix security issue

This commit is contained in:
Ryan Voots 2016-12-30 21:04:59 -08:00
parent 4bb5dbd762
commit 422ace207c

View file

@ -144,7 +144,8 @@ sub postload {
# command such as "forget foo"
# Need to add "what is foo?" support...
sub command {
my( $self, $said, $pm ) = @_;
my( $self, $_said, $pm ) = @_;
my $said = +{$_said->%*};
my $conf = $self->get_conf_for_channel($pm, $said->{server}, $said->{channel});