| 1 |
diff -Naur qpsmtpd-0.84.old/lib/Qpsmtpd/TcpServer.pm qpsmtpd-0.84/lib/Qpsmtpd/TcpServer.pm |
| 2 |
--- qpsmtpd-0.84.old/lib/Qpsmtpd/TcpServer.pm 2010-02-14 06:23:02.000000000 +0100 |
| 3 |
+++ qpsmtpd-0.84/lib/Qpsmtpd/TcpServer.pm 2012-11-13 20:30:13.000000000 +0100 |
| 4 |
@@ -14,7 +14,7 @@ |
| 5 |
# INET6 prior to 2.01 will not work; sorry. |
| 6 |
eval {require IO::Socket::INET6; IO::Socket::INET6->VERSION("2.00");} |
| 7 |
) { |
| 8 |
- import Socket6; |
| 9 |
+ Socket6->import(qw(inet_ntop)); |
| 10 |
$has_ipv6=1; |
| 11 |
} |
| 12 |
else { |
| 13 |
diff -Naur qpsmtpd-0.84.old/qpsmtpd-forkserver qpsmtpd-0.84/qpsmtpd-forkserver |
| 14 |
--- qpsmtpd-0.84.old/qpsmtpd-forkserver 2010-04-08 07:29:52.000000000 +0200 |
| 15 |
+++ qpsmtpd-0.84/qpsmtpd-forkserver 2012-11-13 20:28:56.000000000 +0100 |
| 16 |
@@ -20,10 +20,6 @@ |
| 17 |
|
| 18 |
my $has_ipv6 = Qpsmtpd::TcpServer::has_ipv6; |
| 19 |
|
| 20 |
-if ($has_ipv6) { |
| 21 |
- eval 'use Socket6'; |
| 22 |
-} |
| 23 |
- |
| 24 |
# Configuration |
| 25 |
my $MAXCONN = 15; # max simultaneous connections |
| 26 |
my @PORT; # port number(s) |
| 27 |
diff -Naur qpsmtpd-0.84.old/qpsmtpd-prefork qpsmtpd-0.84/qpsmtpd-prefork |
| 28 |
--- qpsmtpd-0.84.old/qpsmtpd-prefork 2010-02-13 06:30:12.000000000 +0100 |
| 29 |
+++ qpsmtpd-0.84/qpsmtpd-prefork 2012-11-13 20:28:50.000000000 +0100 |
| 30 |
@@ -31,10 +31,6 @@ |
| 31 |
|
| 32 |
my $has_ipv6 = Qpsmtpd::TcpServer::has_ipv6; |
| 33 |
|
| 34 |
-if ($has_ipv6) { |
| 35 |
- use Socket6; |
| 36 |
-} |
| 37 |
- |
| 38 |
#use Time::HiRes qw(gettimeofday tv_interval); |
| 39 |
|
| 40 |
#get available signals |
Parent Directory
| 
Revision Log
| 
Revision Graph
