GitHub/pbot
3
0
Fork 0
mirror of https://github.com/pragma-/pbot.git synced 2024-10-03 01:48:38 +02:00
Code Issues Projects Releases Wiki Activity

Add explicit dereferences

Browse Source
This commit is contained in:
Pragmatic Software 2016-02-25 00:46:55 -08:00
parent fb846a36ed
commit 76d9184c1d
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
PBot/BanTracker.pm
View File

@ -104,8 +104,8 @@ sub get_baninfo {
my ($nick, $user, $host) = $mask =~ m/([^!]+)!([^@]+)@(.*)/;
foreach my $mode (keys %{ $self->{banlist}{$channel} }) {
foreach my $banmask (keys %{ $self->{banlist}{$channel}{$mode} }) {
foreach my $mode (keys %{ $self->{banlist}->{$channel} }) {
foreach my $banmask (keys %{ $self->{banlist}->{$channel}->{$mode} }) {
if($banmask =~ m/^\$a:(.*)/) {
$ban_account = lc $1;
} else {
@ -138,8 +138,8 @@ sub get_baninfo {
my $baninfo = {};
$baninfo->{banmask} = $banmask_key;
$baninfo->{channel} = $channel;
$baninfo->{owner} = $self->{banlist}{$channel}{$mode}{$banmask_key}[0];
$baninfo->{when} = $self->{banlist}{$channel}{$mode}{$banmask_key}[1];
$baninfo->{owner} = $self->{banlist}->{$channel}->{$mode}->{$banmask_key}->[0];
$baninfo->{when} = $self->{banlist}->{$channel}->{$mode}->{$banmask_key}->[1];
$baninfo->{type} = $mode;
$self->{pbot}->{logger}->log("get-baninfo: dump: " . Dumper($baninfo) . "\n");