GitHub
/
pbot
mirror of https://github.com/pragma-/pbot.git
3
0
Fork 0
Code Issues Projects Releases Wiki Activity

Fix scalar keys thing

This commit is contained in:
Pragmatic Software 2017-10-09 19:40:32 -07:00
parent 7e76740f5b
commit 240b4a6df0
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
PBot/Plugins/AntiTwitter.pm
View File

@ -78,12 +78,12 @@ sub adjust_offenses {
my $self = shift;
my $now = gettimeofday;
foreach my $channel (keys $self->{offenses}) {
foreach my $nick (keys $self->{offenses}->{$channel}) {
foreach my $channel (keys %{ $self->{offenses} }) {
foreach my $nick (keys %{ $self->{offenses}->{$channel} }) {
if ($now - $self->{offenses}->{$channel}->{$nick}->{time} >= 60 * 60 * 24 * 7) {
if (--$self->{offenses}->{$channel}->{$nick}->{offenses} <= 0) {
delete $self->{offenses}->{$channel}->{$nick};
delete $self->{offenses}->{$channel} if not keys $self->{offenses}->{$channel};
delete $self->{offenses}->{$channel} if not keys %{ $self->{offenses}->{$channel} };
}
}
}