[libnet-dns-perl] 01/02: Ignore link-local IPv6 resolvers (Closes: #765327)

[Ondrej Sury]

This is an automated email from the git hooks/post-receive script.

ondrej pushed a commit to branch master
in repository libnet-dns-perl.

commit df74f5ec0ed489a4ac316003459ea88b651d4a9d
Author: Ondřej Surý <ondrej at sury.org>
Date:   Mon Nov 17 16:18:08 2014 +0100

    Ignore link-local IPv6 resolvers (Closes: #765327)
---
 debian/patches/ignore-link-local-IPv6-resolvers.patch | 11 +++++++++++
 debian/patches/series                                 |  1 +
 2 files changed, 12 insertions(+)

diff --git a/debian/patches/ignore-link-local-IPv6-resolvers.patch b/debian/patches/ignore-link-local-IPv6-resolvers.patch
new file mode 100644
index 0000000..8e28d9b
--- /dev/null
+++ b/debian/patches/ignore-link-local-IPv6-resolvers.patch
@@ -0,0 +1,11 @@
+--- libnet-dns-perl.orig/lib/Net/DNS/Resolver/Base.pm
++++ libnet-dns-perl/lib/Net/DNS/Resolver/Base.pm
+@@ -249,7 +249,7 @@ sub read_config_file {
+ 
+ 		/^nameserver/ && do {
+ 			my ( $keyword, @ip ) = grep defined, split;
+-			push @ns, map $_ eq '0' ? '0.0.0.0' : $_, @ip;
++			push @ns, map $_ eq '0' ? '0.0.0.0' : $_, grep !/%/, @ip;
+ 			next;
+ 		};
+ 
diff --git a/debian/patches/series b/debian/patches/series
index 1e78009..81c604a 100644
--- a/debian/patches/series
+++ b/debian/patches/series
@@ -1 +1,2 @@
 dnswalk-readme-note.patch
+ignore-link-local-IPv6-resolvers.patch

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libnet-dns-perl.git