Hello community, here is the log from the commit of package perl-Net-DNS for openSUSE:Factory checked in at 2020-09-23 18:36:16 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-Net-DNS (Old) and /work/SRC/openSUSE:Factory/.perl-Net-DNS.new.4249 (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-Net-DNS" Wed Sep 23 18:36:16 2020 rev:62 rq:834237 version:1.27 Changes: -------- --- /work/SRC/openSUSE:Factory/perl-Net-DNS/perl-Net-DNS.changes 2020-08-12 10:55:33.520715325 +0200 +++ /work/SRC/openSUSE:Factory/.perl-Net-DNS.new.4249/perl-Net-DNS.changes 2020-09-23 18:36:25.153108611 +0200 @@ -1,0 +2,6 @@ +Sat Sep 12 03:13:46 UTC 2020 - Tina Müller <[email protected]> + +- updated to 1.27 + see /usr/share/doc/packages/perl-Net-DNS/Changes + +------------------------------------------------------------------- Old: ---- Net-DNS-1.26.tar.gz New: ---- Net-DNS-1.27.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-Net-DNS.spec ++++++ --- /var/tmp/diff_new_pack.eHQJqU/_old 2020-09-23 18:36:28.257111314 +0200 +++ /var/tmp/diff_new_pack.eHQJqU/_new 2020-09-23 18:36:28.261111318 +0200 @@ -17,7 +17,7 @@ Name: perl-Net-DNS -Version: 1.26 +Version: 1.27 Release: 0 %define cpan_name Net-DNS Summary: Perl Interface to the Domain Name System ++++++ Net-DNS-1.26.tar.gz -> Net-DNS-1.27.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Net-DNS-1.26/Changes new/Net-DNS-1.27/Changes --- old/Net-DNS-1.26/Changes 2020-08-05 23:32:22.000000000 +0200 +++ new/Net-DNS-1.27/Changes 2020-09-11 20:49:04.000000000 +0200 @@ -1,7 +1,15 @@ -$Id: Changes 1801 2020-08-05 15:49:06Z willem $ -*-text-*- +$Id: Changes 1806 2020-09-11 18:48:57Z willem $ -*-text-*- -**** 1.26 Aug, 6, 2020 +**** 1.27 Sep 11, 2020 + +Fix rt.cpan.org #133203 + + Net::DNS::RR::LOC erroneously strips non default values from + string representation + + +**** 1.26 Aug 6, 2020 Add HTTPS/SVCB packages. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Net-DNS-1.26/META.json new/Net-DNS-1.27/META.json --- old/Net-DNS-1.26/META.json 2020-08-05 23:32:28.000000000 +0200 +++ new/Net-DNS-1.27/META.json 2020-09-11 20:49:17.000000000 +0200 @@ -61,6 +61,6 @@ } }, "release_status" : "stable", - "version" : "1.26", + "version" : "1.27", "x_serialization_backend" : "JSON::PP version 4.04" } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Net-DNS-1.26/META.yml new/Net-DNS-1.27/META.yml --- old/Net-DNS-1.26/META.yml 2020-08-05 23:32:28.000000000 +0200 +++ new/Net-DNS-1.27/META.yml 2020-09-11 20:49:17.000000000 +0200 @@ -42,5 +42,5 @@ Test::More: '0' Time::Local: '1.19' perl: '5.006' -version: '1.26' +version: '1.27' x_serialization_backend: 'CPAN::Meta::YAML version 0.018' diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Net-DNS-1.26/Makefile.PL new/Net-DNS-1.27/Makefile.PL --- old/Net-DNS-1.26/Makefile.PL 2020-08-05 23:32:22.000000000 +0200 +++ new/Net-DNS-1.27/Makefile.PL 2020-09-11 20:49:04.000000000 +0200 @@ -1,5 +1,5 @@ # -# $Id: Makefile.PL 1795 2020-07-27 11:00:29Z willem $ -*-perl-*- +# $Id: Makefile.PL 1802 2020-08-31 13:44:20Z willem $ -*-perl-*- # use strict; @@ -77,7 +77,7 @@ use constant USE_GETOPT => defined eval 'use Getopt::Long; 1'; my $help = 0; -my $IPv6_tests; +my $IPv6_tests = 1; my $online_tests = 2; ## 2 = non-fatal, 1 = on, 0 = off ## my @options = ( @@ -126,7 +126,7 @@ # Enable tests if we have internet connection (code lifted from LWP) # use constant USE_SOCKET_IP => defined eval 'use IO::Socket::IP 0.38; 1'; -use constant INET_FALLBACK => !USE_SOCKET_IP && eval 'require IO::Socket::INET'; +require IO::Socket::INET unless USE_SOCKET_IP; if ($online_tests) { my $class = USE_SOCKET_IP ? 'IO::Socket::IP' : 'IO::Socket::INET'; @@ -169,7 +169,6 @@ print "\nActivating Online Tests...\n"; } - $IPv6_tests = 1 unless defined $IPv6_tests; if ( USE_SOCKET_IP && $IPv6_tests ) { print "\nActivating IPv6 Tests...\n"; open( ENABLED, '>', $IPv6 ) or die "Can't touch $IPv6 $!"; @@ -256,8 +255,8 @@ ## from the existing @version in your perl library at ## @installed ## -## The installation will be rendered ineffective because the -## library search finds the existing version before reaching +## The installation would be rendered ineffective because the +## installed version occurs in the library search path before ## $install_site ## ## The generated Makefile supports build and test only. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Net-DNS-1.26/lib/Net/DNS/Domain.pm new/Net-DNS-1.27/lib/Net/DNS/Domain.pm --- old/Net-DNS-1.26/lib/Net/DNS/Domain.pm 2020-08-05 23:32:22.000000000 +0200 +++ new/Net-DNS-1.27/lib/Net/DNS/Domain.pm 2020-09-11 20:49:04.000000000 +0200 @@ -1,9 +1,9 @@ package Net::DNS::Domain; # -# $Id: Domain.pm 1784 2020-05-24 19:27:13Z willem $ +# $Id: Domain.pm 1804 2020-09-07 07:57:36Z willem $ # -our $VERSION = (qw$LastChangedRevision: 1784 $)[1]; +our $VERSION = (qw$LastChangedRevision: 1804 $)[1]; =head1 NAME @@ -50,8 +50,8 @@ Encode::encode_utf8( chr(182) ) eq pack( 'H*', 'C2B6' ); }; -use constant LIBIDN => defined eval 'require Net::LibIDN'; use constant LIBIDN2 => ref eval 'require Net::LibIDN2; Net::LibIDN2->can("idn2_to_ascii_8")'; +use constant LIBIDN => LIBIDN2 ? undef : defined eval 'require Net::LibIDN'; use constant IDN2FLAG => eval 'Net::LibIDN2::IDN2_NFC_INPUT + Net::LibIDN2::IDN2_NONTRANSITIONAL'; @@ -122,7 +122,7 @@ croak Net::LibIDN2::idn2_strerror($rc) unless $_; } - if ( !LIBIDN2 && LIBIDN && UTF8 && /[^\000-\177]/ ) { + if ( LIBIDN && UTF8 && /[^\000-\177]/ ) { s/\134/\357\277\275/; # disallow escapes $_ = Net::LibIDN::idn_to_ascii( $_, 'utf-8' ); croak 'name contains disallowed character' unless $_; @@ -205,7 +205,7 @@ return $self->{xname} = $u8 ? $utf8->decode($u8) : $name; } - if ( !LIBIDN2 && LIBIDN && UTF8 && $name =~ /xn--/i ) { + if ( LIBIDN && UTF8 && $name =~ /xn--/i ) { my $self = shift; return $self->{xname} if defined $self->{xname}; return $self->{xname} = $utf8->decode( Net::LibIDN::idn_to_unicode $name, 'utf-8' ); diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Net-DNS-1.26/lib/Net/DNS/RR/LOC.pm new/Net-DNS-1.27/lib/Net/DNS/RR/LOC.pm --- old/Net-DNS-1.26/lib/Net/DNS/RR/LOC.pm 2020-08-05 23:32:22.000000000 +0200 +++ new/Net-DNS-1.27/lib/Net/DNS/RR/LOC.pm 2020-09-11 20:49:04.000000000 +0200 @@ -1,9 +1,9 @@ package Net::DNS::RR::LOC; # -# $Id: LOC.pm 1597 2017-09-22 08:04:02Z willem $ +# $Id: LOC.pm 1802 2020-08-31 13:44:20Z willem $ # -our $VERSION = (qw$LastChangedRevision: 1597 $)[1]; +our $VERSION = (qw$LastChangedRevision: 1802 $)[1]; use strict; @@ -44,9 +44,9 @@ my ( $altitude, @precision ) = map $self->$_() . 'm', qw(altitude size hp vp); my $precision = join ' ', @precision; for ($precision) { - s/\s+10m$//; - s/\s+10000m$//; - s/\s*1m$//; + s/^1m 10000m 10m$//; + s/ 10000m 10m$//; + s/ 10m$//; } my @rdata = ( $self->latitude, '', $self->longitude, '', $altitude, $precision ); } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Net-DNS-1.26/lib/Net/DNS/Resolver/Base.pm new/Net-DNS-1.27/lib/Net/DNS/Resolver/Base.pm --- old/Net-DNS-1.26/lib/Net/DNS/Resolver/Base.pm 2020-08-05 23:32:22.000000000 +0200 +++ new/Net-DNS-1.27/lib/Net/DNS/Resolver/Base.pm 2020-09-11 20:49:04.000000000 +0200 @@ -1,9 +1,9 @@ package Net::DNS::Resolver::Base; # -# $Id: Base.pm 1794 2020-07-03 13:36:51Z willem $ +# $Id: Base.pm 1802 2020-08-31 13:44:20Z willem $ # -our $VERSION = (qw$LastChangedRevision: 1794 $)[1]; +our $VERSION = (qw$LastChangedRevision: 1802 $)[1]; # @@ -27,6 +27,7 @@ use constant USE_SOCKET_IP => defined eval 'use IO::Socket::IP 0.38; 1'; +require IO::Socket::INET unless USE_SOCKET_IP; use constant IPv6 => USE_SOCKET_IP; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Net-DNS-1.26/lib/Net/DNS.pm new/Net-DNS-1.27/lib/Net/DNS.pm --- old/Net-DNS-1.26/lib/Net/DNS.pm 2020-08-05 23:32:22.000000000 +0200 +++ new/Net-DNS-1.27/lib/Net/DNS.pm 2020-09-11 20:49:04.000000000 +0200 @@ -1,13 +1,13 @@ package Net::DNS; # -# $Id: DNS.pm 1801 2020-08-05 15:49:06Z willem $ +# $Id: DNS.pm 1806 2020-09-11 18:48:57Z willem $ # require 5.006; our $VERSION; -$VERSION = '1.26'; +$VERSION = '1.27'; $VERSION = eval $VERSION; -our $SVNVERSION = (qw$LastChangedRevision: 1801 $)[1]; +our $SVNVERSION = (qw$LastChangedRevision: 1806 $)[1]; =head1 NAME diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Net-DNS-1.26/t/02-IDN.t new/Net-DNS-1.27/t/02-IDN.t --- old/Net-DNS-1.26/t/02-IDN.t 2020-08-05 23:32:22.000000000 +0200 +++ new/Net-DNS-1.27/t/02-IDN.t 2020-09-11 20:49:04.000000000 +0200 @@ -1,4 +1,4 @@ -# $Id: 02-IDN.t 1779 2020-05-11 09:11:17Z willem $ -*-perl-*- +# $Id: 02-IDN.t 1804 2020-09-07 07:57:36Z willem $ -*-perl-*- use strict; use Test::More; @@ -13,8 +13,8 @@ Encode::encode_utf8( chr(182) ) eq pack( 'H*', 'C2B6' ); }; -use constant LIBIDN => defined eval 'require Net::LibIDN'; use constant LIBIDN2 => ref eval 'require Net::LibIDN2; Net::LibIDN2->can("idn2_to_ascii_8")'; +use constant LIBIDN => LIBIDN2 ? undef : defined eval 'require Net::LibIDN'; ## ^^^ verbatim from Domain.pm diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Net-DNS-1.26/t/07-zonefile.t new/Net-DNS-1.27/t/07-zonefile.t --- old/Net-DNS-1.26/t/07-zonefile.t 2020-08-05 23:32:22.000000000 +0200 +++ new/Net-DNS-1.27/t/07-zonefile.t 2020-09-11 20:49:04.000000000 +0200 @@ -1,4 +1,4 @@ -# $Id: 07-zonefile.t 1748 2019-07-15 07:57:00Z willem $ -*-perl-*- +# $Id: 07-zonefile.t 1804 2020-09-07 07:57:36Z willem $ -*-perl-*- use strict; use IO::File; @@ -15,8 +15,8 @@ Encode::encode_utf8( chr(182) ) eq pack( 'H*', 'C2B6' ); }; -use constant LIBIDN => defined eval 'require Net::LibIDN'; use constant LIBIDN2 => ref eval 'require Net::LibIDN2; Net::LibIDN2->can("idn2_to_ascii_8")'; +use constant LIBIDN => LIBIDN2 ? undef : defined eval 'require Net::LibIDN'; ## ^^^ verbatim from Domain.pm
