Fix long standing bug of returning 1 not DONE
git-svn-id: https://svn.perl.org/qpsmtpd/trunk@594 958fd67b-6ff1-0310-b445-bb7760255be9
This commit is contained in:
parent
67a6787625
commit
99e0455fa4
@ -93,7 +93,7 @@ sub start_conversation {
|
|||||||
# lib/Qpsmtpd/TcpServer.pm for more confusion.
|
# lib/Qpsmtpd/TcpServer.pm for more confusion.
|
||||||
my ($rc, $msg) = $self->run_hooks("connect");
|
my ($rc, $msg) = $self->run_hooks("connect");
|
||||||
return $self->connect_respond($rc, $msg) unless $rc == CONTINUATION;
|
return $self->connect_respond($rc, $msg) unless $rc == CONTINUATION;
|
||||||
return 1;
|
return DONE;
|
||||||
}
|
}
|
||||||
|
|
||||||
sub connect_respond {
|
sub connect_respond {
|
||||||
|
Loading…
Reference in New Issue
Block a user