summaryrefslogtreecommitdiff
path: root/network/spamassassin/patch-dnsresolver_3.4.0.diff
diff options
context:
space:
mode:
Diffstat (limited to 'network/spamassassin/patch-dnsresolver_3.4.0.diff')
-rw-r--r--network/spamassassin/patch-dnsresolver_3.4.0.diff14
1 files changed, 14 insertions, 0 deletions
diff --git a/network/spamassassin/patch-dnsresolver_3.4.0.diff b/network/spamassassin/patch-dnsresolver_3.4.0.diff
new file mode 100644
index 0000000000..c1ee1a05c6
--- /dev/null
+++ b/network/spamassassin/patch-dnsresolver_3.4.0.diff
@@ -0,0 +1,14 @@
+--- Mail/SpamAssassin/DnsResolver.pm.orig 2014-05-07 17:54:29 +0200
++++ Mail/SpamAssassin/DnsResolver.pm 2014-06-18 02:13:32 +0200
+@@ -205,6 +205,8 @@
+ dbg("dns: servers set by config to: %s", join(', ',@ns_addr_port));
+ } elsif ($res) { # default as provided by Net::DNS, e.g. /etc/resolv.conf
+- @ns_addr_port = map(untaint_var("[$_]:" . $res->{port}),
+- @{$res->{nameservers}});
++ my @ns = $res->UNIVERSAL::can('nameservers') ? $res->nameservers
++ : @{$res->{nameservers}};
++ my $port = $res->UNIVERSAL::can('port') ? $res->port : $res->{port};
++ @ns_addr_port = map(untaint_var("[$_]:" . $port), @ns);
+ dbg("dns: servers obtained from Net::DNS : %s", join(', ',@ns_addr_port));
+ }
+