From 8aa2bac0887d6693d9032f08e9688396666af8ed Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ask=20Bj=C3=B8rn=20Hansen?= <ask@develooper.com>
Date: Fri, 20 Sep 2002 18:55:20 +0000
Subject: [PATCH] work with perl 5.5.3

git-svn-id: https://svn.perl.org/qpsmtpd/trunk@75 958fd67b-6ff1-0310-b445-bb7760255be9
---
 lib/Qpsmtpd/TcpServer.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lib/Qpsmtpd/TcpServer.pm b/lib/Qpsmtpd/TcpServer.pm
index a2885b8..c270686 100644
--- a/lib/Qpsmtpd/TcpServer.pm
+++ b/lib/Qpsmtpd/TcpServer.pm
@@ -1,6 +1,7 @@
 package Qpsmtpd::TcpServer;
+use Qpsmtpd;
+@ISA = qw(Qpsmtpd);
 use strict;
-use base qw(Qpsmtpd);
 
 sub start_connection {
     my $self = shift;