[svn:qpsmtpd] r571 - trunk/lib/Danga
[email protected] 16 Nov 2005 15:04:37 -0000
| Newsgroups | perl.cvs.qpsmtpd |
|---|---|
| Message-ID | <[email protected]> |
Author: msergeant
Date: Wed Nov 16 07:04:37 2005
New Revision: 571
Modified:
trunk/lib/Danga/Client.pm
Log:
With PollServer, I get several unrecognized commands before the disconnect
from plugins/count_unrecognized_commands kicks in.
Several buffered lines are read and processed by
Danga::Client::process_read_buf() without checking if the socket was
closed. The attached patch seems to fix it.
-- Brian Grossman
Modified: trunk/lib/Danga/Client.pm
==============================================================================
--- trunk/lib/Danga/Client.pm (original)
+++ trunk/lib/Danga/Client.pm Wed Nov 16 07:04:37 2005
@@ -111,6 +111,7 @@ sub process_read_buf {
sub readable {
my Danga::Client $self = shift;
return 0 if $self->{disable_read} > 0;
+ return 0 if $self->{closed} > 0;
return 1;
}