From 8454ed40bc37d14451ddea3366b0ad60817ffb77 Mon Sep 17 00:00:00 2001
From: Matt Sergeant <matt@sergeant.org>
Date: Wed, 16 Nov 2005 15:04:37 +0000
Subject: [PATCH] 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


git-svn-id: https://svn.perl.org/qpsmtpd/trunk@571 958fd67b-6ff1-0310-b445-bb7760255be9
---
 lib/Danga/Client.pm | 1 +
 1 file changed, 1 insertion(+)

diff --git a/lib/Danga/Client.pm b/lib/Danga/Client.pm
index 9e4d64a..c1ceabd 100644
--- a/lib/Danga/Client.pm
+++ b/lib/Danga/Client.pm
@@ -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;
 }