[svn:qpsmtpd] r742 - trunk/plugins

[email protected] Thu, 17 May 2007 20:07:54 -0700 (PDT)
Newsgroups perl.cvs.qpsmtpd
Message-ID <[email protected]>
Author: msergeant
Date: Thu May 17 20:07:53 2007
New Revision: 742

Modified:
   trunk/plugins/require_resolvable_fromhost

Log:
Fix for tests failing


Modified: trunk/plugins/require_resolvable_fromhost
==============================================================================
--- trunk/plugins/require_resolvable_fromhost	(original)
+++ trunk/plugins/require_resolvable_fromhost	Thu May 17 20:07:53 2007
@@ -2,9 +2,10 @@
 use Net::DNS qw(mx);
 use Socket;
 use Net::IP qw(:PROC);
+use Qpsmtpd::TcpServer;
 
 my %invalid = ();
-my $has_ipv6 = Qpsmtpd::TcpServer::has_ipv6;
+my $has_ipv6 = Qpsmtpd::TcpServer::has_ipv6();
 
 sub hook_mail {
   my ($self, $transaction, $sender, %param) = @_;