[libnet-dns-perl] 01/02: Reenable workaround against "Too late to run INIT block ..." warning

[Axel Beckert]

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

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

commit 2bcacfd0cf21f9e1027bad9b60708c9113e85243
Author: Axel Beckert <abe at deuxchevaux.org>
Date:   Wed Aug 27 01:54:43 2014 +0200

    Reenable workaround against "Too late to run INIT block ..." warning
    
    ... which upstream disabled again with 0.79.
    
    Closes: #759329
---
 debian/changelog                                       |  7 +++++++
 ...eenable-workaround-too-late-to-run-init-block.patch | 18 ++++++++++++++++++
 debian/patches/series                                  |  1 +
 3 files changed, 26 insertions(+)

diff --git a/debian/changelog b/debian/changelog
index 698ca89..9fd533c 100644
--- a/debian/changelog
+++ b/debian/changelog
@@ -1,3 +1,10 @@
+libnet-dns-perl (0.79-2) UNRELEASED; urgency=medium
+
+  * Re-enable workaround against "Too late to run INIT block ..." warning,
+    which upstream disabled again with 0.79. (Closes: #759329)
+
+ -- Axel Beckert <abe at debian.org>  Wed, 27 Aug 2014 01:51:38 +0200
+
 libnet-dns-perl (0.79-1) unstable; urgency=medium
 
   [ Salvatore Bonaccorso ]
diff --git a/debian/patches/reenable-workaround-too-late-to-run-init-block.patch b/debian/patches/reenable-workaround-too-late-to-run-init-block.patch
new file mode 100644
index 0000000..84f8685
--- /dev/null
+++ b/debian/patches/reenable-workaround-too-late-to-run-init-block.patch
@@ -0,0 +1,18 @@
+Description: Re-enable workaround against "Too late to run INIT block ..." warning
+ Upstream disabled the workaround in 0.79.
+Bug-Debian: https://bugs.debian.org/759329
+Author: Axel Beckert <abe at debian.org>
+
+Index: libnet-dns-perl/lib/Net/DNS.pm
+===================================================================
+--- libnet-dns-perl.orig/lib/Net/DNS.pm	2014-08-27 01:44:45.000000000 +0200
++++ libnet-dns-perl/lib/Net/DNS.pm	2014-08-27 01:54:00.000000000 +0200
+@@ -197,7 +197,7 @@
+ 	}
+ 
+ 	eval {
+-		#no warnings 'void';	## DIY patch to suppress "Too late to run INIT block ..."
++		no warnings 'void';	## DIY patch to suppress "Too late to run INIT block ..."
+ 
+ 		sub INIT {		## only needed to satisfy DNSSEC t/00-load.t
+ 			return unless OLDDNSSEC;
diff --git a/debian/patches/series b/debian/patches/series
index b2e1872..ab50f1c 100644
--- a/debian/patches/series
+++ b/debian/patches/series
@@ -1,2 +1,3 @@
 dnswalk-readme-note.patch
 perl-path-examples.patch
+reenable-workaround-too-late-to-run-init-block.patch

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