Script 'mail_helper' called by obssrc
Hello community,

here is the log from the commit of package perl-Net-DNS-Resolver-Mock for 
openSUSE:Factory checked in at 2022-08-25 15:33:04
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-Net-DNS-Resolver-Mock (Old)
 and      /work/SRC/openSUSE:Factory/.perl-Net-DNS-Resolver-Mock.new.2083 (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Package is "perl-Net-DNS-Resolver-Mock"

Thu Aug 25 15:33:04 2022 rev:3 rq:998968 version:1.20220817

Changes:
--------
--- 
/work/SRC/openSUSE:Factory/perl-Net-DNS-Resolver-Mock/perl-Net-DNS-Resolver-Mock.changes
    2020-02-22 18:59:36.893543596 +0100
+++ 
/work/SRC/openSUSE:Factory/.perl-Net-DNS-Resolver-Mock.new.2083/perl-Net-DNS-Resolver-Mock.changes
  2022-08-25 15:33:05.755924342 +0200
@@ -1,0 +2,9 @@
+Thu Aug 18 03:07:59 UTC 2022 - Tina M??ller <timueller+p...@suse.de>
+
+- updated to 1.20220817
+   see /usr/share/doc/packages/perl-Net-DNS-Resolver-Mock/Changes
+
+  1.20220817 2022-08-17 03:33:52+00:00 UTC
+    - Fix issue when looking up record at the root
+
+-------------------------------------------------------------------

Old:
----
  Net-DNS-Resolver-Mock-1.20200215.tar.gz

New:
----
  Net-DNS-Resolver-Mock-1.20220817.tar.gz

++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Other differences:
------------------
++++++ perl-Net-DNS-Resolver-Mock.spec ++++++
--- /var/tmp/diff_new_pack.lvG3WH/_old  2022-08-25 15:33:06.235925390 +0200
+++ /var/tmp/diff_new_pack.lvG3WH/_new  2022-08-25 15:33:06.243925408 +0200
@@ -1,7 +1,7 @@
 #
 # spec file for package perl-Net-DNS-Resolver-Mock
 #
-# Copyright (c) 2020 SUSE LINUX GmbH, Nuernberg, Germany.
+# Copyright (c) 2022 SUSE LLC
 #
 # All modifications and additions to the file contributed by third parties
 # remain the property of their copyright owners, unless otherwise agreed
@@ -16,18 +16,16 @@
 #
 
 
+%define cpan_name Net-DNS-Resolver-Mock
 Name:           perl-Net-DNS-Resolver-Mock
-Version:        1.20200215
+Version:        1.20220817
 Release:        0
-%define cpan_name Net-DNS-Resolver-Mock
-Summary:        Mock a DNS Resolver object for testing
 License:        Artistic-1.0 OR GPL-1.0-or-later
-Group:          Development/Libraries/Perl
-Url:            https://metacpan.org/release/%{cpan_name}
+Summary:        Mock a DNS Resolver object for testing
+URL:            https://metacpan.org/release/%{cpan_name}
 Source0:        
https://cpan.metacpan.org/authors/id/M/MB/MBRADSHAW/%{cpan_name}-%{version}.tar.gz
 Source1:        cpanspec.yml
 BuildArch:      noarch
-BuildRoot:      %{_tmppath}/%{name}-%{version}-build
 BuildRequires:  perl
 BuildRequires:  perl-macros
 BuildRequires:  perl(Net::DNS::Packet)
@@ -46,11 +44,11 @@
 source. Primarily for use in testing.
 
 %prep
-%setup -q -n %{cpan_name}-%{version}
+%autosetup  -n %{cpan_name}-%{version}
 
 %build
 perl Makefile.PL INSTALLDIRS=vendor
-make %{?_smp_mflags}
+%make_build
 
 %check
 make test
@@ -61,7 +59,6 @@
 %perl_gen_filelist
 
 %files -f %{name}.files
-%defattr(-,root,root,755)
 %doc Changes README
 %license LICENSE
 

++++++ Net-DNS-Resolver-Mock-1.20200215.tar.gz -> 
Net-DNS-Resolver-Mock-1.20220817.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Net-DNS-Resolver-Mock-1.20200215/Changes 
new/Net-DNS-Resolver-Mock-1.20220817/Changes
--- old/Net-DNS-Resolver-Mock-1.20200215/Changes        2020-02-15 
16:07:51.000000000 +0100
+++ new/Net-DNS-Resolver-Mock-1.20220817/Changes        2022-08-17 
05:33:53.000000000 +0200
@@ -1,5 +1,8 @@
 Revision history for Net::DNS::Resolver::Mock
 
+1.20220817 2022-08-17 03:33:52+00:00 UTC
+  - Fix issue when looking up record at the root
+
 1.20200215 2020-02-15 15:07:49+00:00 UTC
   - Add missing Changelog
   - Debugging mode with output via STDERR and method
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Net-DNS-Resolver-Mock-1.20200215/MANIFEST 
new/Net-DNS-Resolver-Mock-1.20220817/MANIFEST
--- old/Net-DNS-Resolver-Mock-1.20200215/MANIFEST       2020-02-15 
16:07:51.000000000 +0100
+++ new/Net-DNS-Resolver-Mock-1.20220817/MANIFEST       2022-08-17 
05:33:53.000000000 +0200
@@ -1,4 +1,4 @@
-# This file was automatically generated by Dist::Zilla::Plugin::Manifest 
v6.012.
+# This file was automatically generated by Dist::Zilla::Plugin::Manifest 
v6.017.
 Changes
 LICENSE
 MANIFEST
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Net-DNS-Resolver-Mock-1.20200215/META.yml 
new/Net-DNS-Resolver-Mock-1.20220817/META.yml
--- old/Net-DNS-Resolver-Mock-1.20200215/META.yml       2020-02-15 
16:07:51.000000000 +0100
+++ new/Net-DNS-Resolver-Mock-1.20220817/META.yml       2022-08-17 
05:33:53.000000000 +0200
@@ -9,7 +9,7 @@
 configure_requires:
   ExtUtils::MakeMaker: '0'
 dynamic_config: 0
-generated_by: 'Dist::Zilla version 6.012, CPAN::Meta::Converter version 
2.150010'
+generated_by: 'Dist::Zilla version 6.017, CPAN::Meta::Converter version 
2.150010'
 license: perl
 meta-spec:
   url: http://module-build.sourceforge.net/META-spec-v1.4.html
@@ -23,6 +23,7 @@
   base: '0'
   strict: '0'
   warnings: '0'
-version: '1.20200215'
-x_generated_by_perl: v5.30.1
+version: '1.20220817'
+x_generated_by_perl: v5.34.0
 x_serialization_backend: 'YAML::Tiny version 1.73'
+x_spdx_expression: 'Artistic-1.0-Perl OR GPL-1.0-or-later'
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Net-DNS-Resolver-Mock-1.20200215/Makefile.PL 
new/Net-DNS-Resolver-Mock-1.20220817/Makefile.PL
--- old/Net-DNS-Resolver-Mock-1.20200215/Makefile.PL    2020-02-15 
16:07:51.000000000 +0100
+++ new/Net-DNS-Resolver-Mock-1.20220817/Makefile.PL    2022-08-17 
05:33:53.000000000 +0200
@@ -1,4 +1,4 @@
-# This file was automatically generated by Dist::Zilla::Plugin::MakeMaker 
v6.012.
+# This file was automatically generated by Dist::Zilla::Plugin::MakeMaker 
v6.017.
 use strict;
 use warnings;
 
@@ -29,7 +29,7 @@
     "Test::Exception" => 0,
     "Test::More" => 0
   },
-  "VERSION" => "1.20200215",
+  "VERSION" => "1.20220817",
   "test" => {
     "TESTS" => "t/*.t"
   }
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' 
old/Net-DNS-Resolver-Mock-1.20200215/lib/Net/DNS/Resolver/Mock.pm 
new/Net-DNS-Resolver-Mock-1.20220817/lib/Net/DNS/Resolver/Mock.pm
--- old/Net-DNS-Resolver-Mock-1.20200215/lib/Net/DNS/Resolver/Mock.pm   
2020-02-15 16:07:51.000000000 +0100
+++ new/Net-DNS-Resolver-Mock-1.20220817/lib/Net/DNS/Resolver/Mock.pm   
2022-08-17 05:33:53.000000000 +0200
@@ -3,7 +3,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '1.20200215'; # VERSION
+our $VERSION = '1.20220817'; # VERSION
 
 use base 'Net::DNS::Resolver';
 
@@ -70,7 +70,7 @@
         die $die_on->{ "$name $type" };
     }
 
-    $name =~ s/\.$//;
+    $name =~ s/\.$// unless $name eq '.';
 
     my $FakeZone = $self->{ 'zonefile' };
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Net-DNS-Resolver-Mock-1.20200215/t/01-test.t 
new/Net-DNS-Resolver-Mock-1.20220817/t/01-test.t
--- old/Net-DNS-Resolver-Mock-1.20200215/t/01-test.t    2020-02-15 
16:07:51.000000000 +0100
+++ new/Net-DNS-Resolver-Mock-1.20220817/t/01-test.t    2022-08-17 
05:33:53.000000000 +0200
@@ -7,7 +7,7 @@
 
 use Net::DNS::Resolver::Mock;
 
-plan tests => 20;
+plan tests => 24;
 
 {
     my $Resolver = Net::DNS::Resolver::Mock->new();
@@ -70,3 +70,20 @@
     dies_ok( sub{ $Resolver->query( 'cnameptr.example.com.', 'PTR' ) }, 'Dies 
ok' );
 }
 
+{
+    my $ZoneData = join( "\n",
+        '. 3600 A 1.2.3.4',
+    );
+
+    my $Resolver = Net::DNS::Resolver::Mock->new();
+    $Resolver->zonefile_parse( $ZoneData );
+
+    my $Reply;
+
+    $Reply = $Resolver->query( '.', 'A' );
+    is( defined( $Reply ), 1, 'Valid entry returns set' );
+    is( ref $Reply, 'Net::DNS::Packet', 'Net::DNS::Packet object returned' );
+    is( ref $Reply->{ 'answer' }->[0], 'Net::DNS::RR::A', 'New::DNS::RR::A 
object returned' );
+    is( $Reply->{ 'answer' }->[0]->rdatastr(), '1.2.3.4', 'Correct IP Address 
returned' );;
+}
+

Reply via email to