From df1efdce73aad1da61c1e9252d3b3cc4f3741483 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ask=20Bj=C3=B8rn=20Hansen?= <ask@develooper.com>
Date: Wed, 9 Mar 2005 00:20:32 +0000
Subject: [PATCH] use $self->can_read rather than $self->qp->can_read with high
 perf patch

git-svn-id: https://svn.perl.org/qpsmtpd/branches/high_perf@392 958fd67b-6ff1-0310-b445-bb7760255be9
---
 plugins/check_earlytalker | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/plugins/check_earlytalker b/plugins/check_earlytalker
index 3d43302..950df60 100644
--- a/plugins/check_earlytalker
+++ b/plugins/check_earlytalker
@@ -70,8 +70,8 @@ sub register {
 
 sub connect_handler {
   my ($self, $transaction) = @_;
-  
-  if ($self->qp->can_read($self->{_args}->{'wait'})) {
+
+  if ($self->can_read($self->{_args}->{'wait'})) {
     $self->log(LOGNOTICE, 'remote host started talking before we said hello');
     if ($self->{_args}->{'defer-reject'}) {
 	$self->connection->notes('earlytalker', 1);