byterazor/qpsmtpd
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

anglebrackets: increase penalty, prefix log msgs

Browse Source
This commit is contained in:
Matt Simerson 2013-12-18 00:16:41 -05:00
parent bcc6adae19
commit 45316487e3
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
plugins/dont_require_anglebrackets
View File

@ -24,9 +24,9 @@ MAIL FROM:user@example.com
sub hook_mail_pre {
my ($self, $transaction, $addr) = @_;
unless ($addr =~ /^<.*>$/) {
$self->log(LOGINFO, "added MAIL angle brackets");
$addr = '<' . $addr . '>';
$self->adjust_karma(-1);
$self->adjust_karma(-2);
$self->log(LOGINFO, "fail, added MAIL angle brackets");
}
return (OK, $addr);
}
@ -34,9 +34,9 @@ sub hook_mail_pre {
sub hook_rcpt_pre {
my ($self, $transaction, $addr) = @_;
unless ($addr =~ /^<.*>$/) {
$self->log(LOGINFO, "added RCPT angle brackets");
$addr = '<' . $addr . '>';
$self->adjust_karma(-1);
$self->adjust_karma(-2);
$self->log(LOGINFO, "fail, added RCPT angle brackets");
}
return (OK, $addr);
}