[libnet-dns-zonefile-fast-perl] 02/06: replace deprecated function typearry2typebm

[Christoph Martin]

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

chrism pushed a commit to branch master
in repository libnet-dns-zonefile-fast-perl.

commit d649eb49d22c669f9dcd8a45817f31bb4344088e
Author: Christoph Martin <martin at uni-mainz.de>
Date:   Thu Jun 9 10:34:12 2016 +0200

    replace deprecated function typearry2typebm
---
 ...-fix-deprecated-function-typearray2typebm.patch | 30 ++++++++++++++++++++++
 1 file changed, 30 insertions(+)

diff --git a/debian/patches/0003-fix-deprecated-function-typearray2typebm.patch b/debian/patches/0003-fix-deprecated-function-typearray2typebm.patch
new file mode 100644
index 0000000..7238a24
--- /dev/null
+++ b/debian/patches/0003-fix-deprecated-function-typearray2typebm.patch
@@ -0,0 +1,30 @@
+replace usage of deprecated function typearray2typebm with type2bm
+--- a/Fast.pm
++++ b/Fast.pm
+@@ -975,7 +975,7 @@ sub parse_line
+ 		 nxtdname  => $nxtdname,
+ 		 typelist  => $typelist,
+ 		 typebm    =>
+-		 Net::DNS::RR::NSEC::_typearray2typebm(split(/\s+/,$typelist)),
++		 Net::DNS::RR::NSEC::_type2bm(split(/\s+/,$typelist)),
+ 		};
+ 	  } else {
+ 	      error("bad NSEC data");
+@@ -1007,7 +1007,7 @@ sub parse_line
+                  saltlength  => int(length($salt)/2),
+                  typelist    => $typelist,
+                  typebm      =>
+-                 Net::DNS::RR::NSEC::_typearray2typebm(split(/\s+/,$typelist)),
++                 Net::DNS::RR::NSEC::_type2bm(split(/\s+/,$typelist)),
+                 };
+ # multi-line
+           } elsif (/\G\s*(\d+)\s+(\d+)\s+(\d+)\s+([-0-9A-Fa-f]+)\s+\(/gc) {
+@@ -1355,7 +1355,7 @@ sub parse_nsec3
+ 	 $typelist = join(" ",sort split(/\s+/,$typelist));
+          $nsec3->{ 'typelist' } = $typelist;
+ 	 $nsec3->{ 'typebm' } =
+-	     Net::DNS::RR::NSEC::_typearray2typebm(split(/\s+/,$typelist));
++	     Net::DNS::RR::NSEC::_type2bm(split(/\s+/,$typelist));
+ 	 push @zone, $nsec3; 
+ 	 # we're done
+ 	 $parse = \&parse_line;

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