develooper Front page | perl.cvs.qpsmtpd | Postings from November 2006

[svn:qpsmtpd] r670 - branches/0.3x

From:
aqua
Date:
November 5, 2006 01:48
Subject:
[svn:qpsmtpd] r670 - branches/0.3x
Message ID:
20061105094719.52D06CBAA8@x12.develooper.com
Author: aqua
Date: Sun Nov  5 01:47:18 2006
New Revision: 670

Modified:
   branches/0.3x/qpsmtpd-forkserver

Log:
Fix startup of qpsmtpd-forkserver on hosts lacking Socket6 (it's not enough
to have 'use Socket6' in a conditional, it must be evalled also)


Modified: branches/0.3x/qpsmtpd-forkserver
==============================================================================
--- branches/0.3x/qpsmtpd-forkserver	(original)
+++ branches/0.3x/qpsmtpd-forkserver	Sun Nov  5 01:47:18 2006
@@ -20,7 +20,7 @@
 my $has_ipv6 = Qpsmtpd::Constants::has_ipv6;
 
 if ($has_ipv6) {
-  use Socket6;
+  eval 'use Socket6';
 }
 
 # Configuration



nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About