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 |
- |
|
|