1 |
charliebrady |
1.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 |