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

forgot another place to put DENYSOFTHARD

Browse Source 
git-svn-id: https://svn.perl.org/qpsmtpd/trunk@241 958fd67b-6ff1-0310-b445-bb7760255be9
This commit is contained in:
Robert Spier 2004-06-11 06:11:27 +00:00
parent 48d753ca25
commit 971b696ffa
1 changed files with 6 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lib/Qpsmtpd/SMTP.pm
View File

@ -279,6 +279,12 @@ sub rcpt {
$self->respond(550, $msg);
$self->disconnect;
}
elsif ($rc == DENYSOFTHARD) {
$msg ||= 'relaying denied';
$self->log(LOGINFO, "delivery denied ($msg)");
$self->respond(450, $msg);
$self->disconnect;
}
elsif ($rc == OK) {
$self->respond(250, $rcpt->format . ", recipient ok");
return $self->transaction->add_recipient($rcpt);