rpms/perl-Net-DNS-Resolver-Programmable
6
0
Fork 0
Code Issues Pull Requests Releases Activity

Do not use private Net::DNS API removed in Net-DNS-0.75

Browse Source
This commit is contained in:
Petr Písař 2014-07-24 14:53:15 +02:00
parent 735e702112
commit b67ef6f8fa
2 changed files with 31 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

23
Net-DNS-Resolver-Programmable-v0.003-new-net-dns.patch Normal file
View File

@ -0,0 +1,23 @@
Description: deal with changes in Net::DNS >= 0.75
Origin: CPAN RT
Bug: https://rt.cpan.org/Public/Bug/Display.html?id=95901
Bug-Debian: https://bugs.debian.org/752988
Author: Willen <NLNETLABS@cpan.org>
Reviewed-by: gregor herrmann <gregoa@debian.org>
Last-Update: 2014-06-29
--- a/lib/Net/DNS/Resolver/Programmable.pm
+++ b/lib/Net/DNS/Resolver/Programmable.pm
@@ -204,8 +204,10 @@
if (defined(my $resolver_code = $self->{resolver_code})) {
($result, $aa, @answer_rrs) = $resolver_code->($domain, $rr_type, $class);
}
-
- if (not defined($result) or defined($Net::DNS::rcodesbyname{$result})) {
+
+ if (not defined($result)
+ or defined($Net::DNS::rcodesbyname{$result})
+ or defined($Net::DNS::Parameters::rcodebyname{$result})) {
# Valid RCODE, return a packet:
$aa = TRUE if not defined($aa);

9
perl-Net-DNS-Resolver-Programmable.spec
View File

@ -1,11 +1,14 @@
Name: perl-Net-DNS-Resolver-Programmable
Version: 0.003
Release: 18%{?dist}
Release: 19%{?dist}
Summary: Programmable DNS resolver class for offline emulation of DNS
License: GPLv2+ or Artistic
Group: Development/Libraries
URL: http://search.cpan.org/dist/Net-DNS-Resolver-Programmable/
Source0: http://www.cpan.org/authors/id/J/JM/JMEHNLE/net-dns-resolver-programmable/Net-DNS-Resolver-Programmable-v%{version}.tar.gz
# Do not use private Net::DNS API removed in Net-DNS-0.75, bug #1099382,
# CPAN RT#95901
Patch0: Net-DNS-Resolver-Programmable-v0.003-new-net-dns.patch
BuildArch: noarch
BuildRequires: perl(Module::Build)
Requires: perl(:MODULE_COMPAT_%(eval "`%{__perl} -V:version`"; echo $version))
@ -19,6 +22,7 @@ on the fly.
%prep
%setup -q -n Net-DNS-Resolver-Programmable-v%{version}
%patch0 -p1
%build
%{__perl} Build.PL installdirs=vendor
@ -37,6 +41,9 @@ on the fly.
%{_mandir}/man3/*
%changelog
* Thu Jul 24 2014 Petr Pisar <ppisar@redhat.com> - 0.003-19
- Do not use private Net::DNS API removed in Net-DNS-0.75 (bug #1099382)
* Sat Jun 07 2014 Fedora Release Engineering <rel-eng@lists.fedoraproject.org> - 0.003-18
- Rebuilt for https://fedoraproject.org/wiki/Fedora_21_Mass_Rebuild