anglebrackets: emit log entry when change made

This commit is contained in:
Matt Simerson 2012-05-18 04:25:09 -04:00 committed by Robert
parent 691955c60f
commit edacbf914c

View File

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