31 |
my $log_mess = ''; |
my $log_mess = ''; |
32 |
|
|
33 |
- if ($karma < -2) { # they achieved at least 2 strikes |
- if ($karma < -2) { # they achieved at least 2 strikes |
34 |
+ if ($karma =< $self->{_args}{strikes}) { # Enough negative strikes ? |
+ if ($karma <= $self->{_args}{strikes}) { # Enough negative strikes ? |
35 |
$history--; |
$history--; |
36 |
my $negative_limit = 0 - $self->{_args}{negative}; |
my $negative_limit = 0 - $self->{_args}{negative}; |
37 |
if ($history <= $negative_limit) { |
if ($history <= $negative_limit) { |