Fix logging when dropping a mail due to size (m. allan noah /

kitno455, issue #13)


git-svn-id: https://svn.perl.org/qpsmtpd/trunk@741 958fd67b-6ff1-0310-b445-bb7760255be9
This commit is contained in:
Ask Bjørn Hansen 2007-05-17 22:28:28 +00:00
parent ccf990e032
commit 0a1cabf806
2 changed files with 5 additions and 1 deletions

View File

@ -2,6 +2,9 @@
Added tests for the rcpt_ok plugin (Guy Hulbert, issue #4) Added tests for the rcpt_ok plugin (Guy Hulbert, issue #4)
Fix logging when dropping a mail due to size (m. allan noah /
kitno455, issue #13)
greylisting: fix db_dir configuration option so it actually works greylisting: fix db_dir configuration option so it actually works
(kitno455, issue #6) (kitno455, issue #6)

View File

@ -685,6 +685,7 @@ sub data_respond {
#$self->respond(550, $self->transaction->blocked),return 1 if ($self->transaction->blocked); #$self->respond(550, $self->transaction->blocked),return 1 if ($self->transaction->blocked);
if ($max_size and $size > $max_size) { if ($max_size and $size > $max_size) {
$self->log(LOGALERT, "Message too big: size: $size (max size: $max_size)");
$self->respond(552, "Message too big!"); $self->respond(552, "Message too big!");
$self->reset_transaction; # clean up after ourselves $self->reset_transaction; # clean up after ourselves
return 1; return 1;