diff options
Diffstat (limited to 'lib/ASM/Event.pm')
| -rw-r--r-- | lib/ASM/Event.pm | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/lib/ASM/Event.pm b/lib/ASM/Event.pm index fac5c06..5e0435c 100644 --- a/lib/ASM/Event.pm +++ b/lib/ASM/Event.pm @@ -222,8 +222,8 @@ sub on_part my $nick = lc $event->{nick}; my $chan = lc $event->{to}->[0]; # Ignore channels that are +s and not monitored - if (defined $::db and $event->{args}->[0] =~ /^requested by/ and (not ((grep { /^s$/ } @{$::sc{$chan}{modes}} ) && ($::channels->{channel}->{$chan}->{monitor} eq "no"))) ) { - my $idx = $::db->actionlog( $event); + if ($event->{args}->[0] =~ /^requested by/ and (not ((grep { /^s$/ } @{$::sc{$chan}{modes}} ) && ($::channels->{channel}->{$chan}->{monitor} eq "no"))) ) { + my $idx = $::log->actionlog( $event); $::log->sqlIncident($chan, $idx) if $idx; } if (defined($::sn{$nick}) && defined($::sn{$nick}->{mship})) { @@ -299,7 +299,7 @@ sub on_quit } $event->{to} = \@channels; if (defined $::db) { - my $idx = $::db->actionlog($event); + my $idx = $::log->actionlog($event); # Ignore channels that are +s and not monitored my @actionlog_channels = grep { not ((grep { /^s$/ } @{$::sc{$_}{modes}}) && ($::channels->{channel}->{$_}->{monitor} eq "no")) } @channels; $::log->sqlIncident( join(',', @actionlog_channels), $idx ) if $idx; @@ -425,7 +425,7 @@ sub on_kick { if (defined $::db) { # Ignore channels that are +s and not monitored if ( not ((grep { /^s$/ } @{$::sc{$chan}{modes}}) && ($::channels->{channel}->{$chan}->{monitor} eq "no")) ) { - my $idx = $::db->actionlog($event); + my $idx = $::log->actionlog($event); $::log->sqlIncident($chan, $idx) if $idx; } } @@ -567,7 +567,7 @@ sub on_mode foreach my $victim (@affected) { # Ignore channels that are +s and not monitored if ( not ((grep { /^s$/ } @{$::sc{$chan}{modes}}) && ($::channels->{channel}->{$chan}->{monitor} eq "no")) ) { - my $idx = $::db->actionlog($event, 'ban', $victim); + my $idx = $::log->actionlog($event, 'ban', $victim); $::log->sqlIncident( $chan, $idx ) if $idx; } } @@ -594,7 +594,7 @@ sub on_mode foreach my $victim (@affected) { # Ignore channels that are +s and not monitored if ( not ((grep { /^s$/ } @{$::sc{$chan}{modes}}) && ($::channels->{channel}->{$chan}->{monitor} eq "no")) ) { - my $idx = $::db->actionlog($event, 'quiet', $victim); + my $idx = $::log->actionlog($event, 'quiet', $victim); $::log->sqlIncident( $chan, $idx ) if $idx; } } |