add connection->reset also for -async

git-svn-id: https://svn.perl.org/qpsmtpd/trunk@897 958fd67b-6ff1-0310-b445-bb7760255be9
2008-05-10 05:55:56 +00:00 · 2008-05-10 05:55:56 +00:00 · 7ad1054507
commit 7ad1054507
parent 104c8b1710
1 changed files with 1 additions and 0 deletions
--- a/lib/Qpsmtpd/PollServer.pm
+++ b/lib/Qpsmtpd/PollServer.pm
@ -152,6 +152,7 @@ sub disconnect {
 sub close {
    my Qpsmtpd::PollServer $self = shift;
    $self->run_hooks("post-connection");
+    $self->connection->reset;
    $self->SUPER::close;
 }