|
Lines 131-137
sub exceeds_limit {
Link Here
|
| 131 |
|
131 |
|
| 132 |
if ($incr) { |
132 |
if ($incr) { |
| 133 |
$domain_limits->{$group}->{count}++; |
133 |
$domain_limits->{$group}->{count}++; |
| 134 |
warn "Sending messages: domain $group reached limit of " . $domain_limits->{$group}->{limit} |
134 |
warn "Sending messages: The domain $group has reached the limit of " |
|
|
135 |
. $domain_limits->{$group}->{limit} |
| 136 |
. " messages per " |
| 137 |
. $domain_limits->{$group}->{units} |
| 138 |
. " " |
| 139 |
. $domain_limits->{$group}->{unit_type} |
| 135 |
if $domain_limits->{$group}->{count} == $domain_limits->{$group}->{limit}; |
140 |
if $domain_limits->{$group}->{count} == $domain_limits->{$group}->{limit}; |
| 136 |
} |
141 |
} |
| 137 |
return 0; |
142 |
return 0; |
| 138 |
- |
|
|