Script 'mail_helper' called by obssrc Hello community, here is the log from the commit of package perl-Test-Warn for openSUSE:Factory checked in at 2022-08-17 18:16:43 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-Test-Warn (Old) and /work/SRC/openSUSE:Factory/.perl-Test-Warn.new.1521 (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-Test-Warn" Wed Aug 17 18:16:43 2022 rev:28 rq:997403 version:0.37 Changes: -------- --- /work/SRC/openSUSE:Factory/perl-Test-Warn/perl-Test-Warn.changes 2018-07-04 23:53:36.707992718 +0200 +++ /work/SRC/openSUSE:Factory/.perl-Test-Warn.new.1521/perl-Test-Warn.changes 2022-08-17 18:22:52.827144919 +0200 @@ -1,0 +2,12 @@ +Sun Aug 14 03:10:32 UTC 2022 - Tina M??ller <[email protected]> + +- updated to 0.37 + see /usr/share/doc/packages/perl-Test-Warn/Changes + + 0.37 2022-08-13 + Merged PR: + - allow duplicate warnings when using warnings_exist + https://github.com/hanfried/test-warn/pull/8 + thx to Masahiro Honma (hiratara) + +------------------------------------------------------------------- Old: ---- Test-Warn-0.36.tar.gz New: ---- Test-Warn-0.37.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-Test-Warn.spec ++++++ --- /var/tmp/diff_new_pack.oTwKFN/_old 2022-08-17 18:22:53.371146047 +0200 +++ /var/tmp/diff_new_pack.oTwKFN/_new 2022-08-17 18:22:53.383146072 +0200 @@ -1,7 +1,7 @@ # # spec file for package perl-Test-Warn # -# Copyright (c) 2018 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 @@ -12,22 +12,20 @@ # license that conforms to the Open Source Definition (Version 1.9) # published by the Open Source Initiative. -# Please submit bugfixes or comments via http://bugs.opensuse.org/ +# Please submit bugfixes or comments via https://bugs.opensuse.org/ # +%define cpan_name Test-Warn Name: perl-Test-Warn -Version: 0.36 +Version: 0.37 Release: 0 -%define cpan_name Test-Warn -Summary: Perl extension to test methods for warnings License: Artistic-1.0 OR GPL-1.0-or-later -Group: Development/Libraries/Perl -Url: http://search.cpan.org/dist/Test-Warn/ +Summary: Perl extension to test methods for warnings +URL: https://metacpan.org/release/%{cpan_name} Source0: https://cpan.metacpan.org/authors/id/B/BI/BIGJ/%{cpan_name}-%{version}.tar.gz Source1: cpanspec.yml BuildArch: noarch -BuildRoot: %{_tmppath}/%{name}-%{version}-build BuildRequires: perl BuildRequires: perl-macros BuildRequires: perl(Carp) >= 1.22 @@ -47,15 +45,15 @@ the time to go take a look. %prep -%setup -q -n %{cpan_name}-%{version} -find . -type f ! -name \*.pl -print0 | xargs -0 chmod 644 +%autosetup -n %{cpan_name}-%{version} +find . -type f ! -path "*/t/*" ! -name "*.pl" ! -path "*/bin/*" ! -path "*/script/*" ! -name "configure" -print0 | xargs -0 chmod 644 %build -%{__perl} Makefile.PL INSTALLDIRS=vendor -%{__make} %{?_smp_mflags} +perl Makefile.PL INSTALLDIRS=vendor +%make_build %check -%{__make} test +make test %install %perl_make_install @@ -63,7 +61,6 @@ %perl_gen_filelist %files -f %{name}.files -%defattr(-,root,root,755) %doc Changes README %changelog ++++++ Test-Warn-0.36.tar.gz -> Test-Warn-0.37.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Test-Warn-0.36/Changes new/Test-Warn-0.37/Changes --- old/Test-Warn-0.36/Changes 2018-06-23 12:00:45.000000000 +0200 +++ new/Test-Warn-0.37/Changes 2022-08-13 11:10:16.000000000 +0200 @@ -1,5 +1,11 @@ Revision history for Perl extension Test::Warn. +0.37 2022-08-13 + Merged PR: + - allow duplicate warnings when using warnings_exist + https://github.com/hanfried/test-warn/pull/8 + thx to Masahiro Honma (hiratara) + 0.36 2018-06-23 - Added provide section to META.yml via changing Makefile.PL diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Test-Warn-0.36/META.json new/Test-Warn-0.37/META.json --- old/Test-Warn-0.36/META.json 2018-06-23 12:04:28.000000000 +0200 +++ new/Test-Warn-0.37/META.json 2022-08-13 11:18:44.000000000 +0200 @@ -4,7 +4,7 @@ "Janek Schleicher <[email protected]>" ], "dynamic_config" : 1, - "generated_by" : "ExtUtils::MakeMaker version 7.24, CPAN::Meta::Converter version 2.150010", + "generated_by" : "ExtUtils::MakeMaker version 7.34, CPAN::Meta::Converter version 2.150010", "keywords" : [ "testing", "warnings" @@ -14,7 +14,7 @@ ], "meta-spec" : { "url" : "http://search.cpan.org/perldoc?CPAN::Meta::Spec";, - "version" : "2" + "version" : 2 }, "name" : "Test-Warn", "no_index" : { @@ -53,7 +53,7 @@ "provides" : { "Test::Warn" : { "file" : "Warn.pm", - "version" : "0.36" + "version" : "0.37" } }, "release_status" : "stable", @@ -64,6 +64,6 @@ "web" : "https://github.com/hanfried/test-warn"; } }, - "version" : "0.36", - "x_serialization_backend" : "JSON::PP version 2.27400_02" + "version" : "0.37", + "x_serialization_backend" : "JSON::PP version 4.02" } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Test-Warn-0.36/META.yml new/Test-Warn-0.37/META.yml --- old/Test-Warn-0.36/META.yml 2018-06-23 12:04:28.000000000 +0200 +++ new/Test-Warn-0.37/META.yml 2022-08-13 11:18:44.000000000 +0200 @@ -9,7 +9,7 @@ configure_requires: ExtUtils::MakeMaker: '0' dynamic_config: 1 -generated_by: 'ExtUtils::MakeMaker version 7.24, CPAN::Meta::Converter version 2.150010' +generated_by: 'ExtUtils::MakeMaker version 7.34, CPAN::Meta::Converter version 2.150010' keywords: - testing - warnings @@ -25,7 +25,7 @@ provides: Test::Warn: file: Warn.pm - version: '0.36' + version: '0.37' requires: Carp: '1.22' Sub::Uplevel: '0.12' @@ -34,5 +34,5 @@ perl: '5.006' resources: repository: git://github.com/hanfried/test-warn.git -version: '0.36' +version: '0.37' x_serialization_backend: 'CPAN::Meta::YAML version 0.018' diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Test-Warn-0.36/Makefile.PL new/Test-Warn-0.37/Makefile.PL --- old/Test-Warn-0.36/Makefile.PL 2018-06-23 11:59:13.000000000 +0200 +++ new/Test-Warn-0.37/Makefile.PL 2022-08-13 11:10:39.000000000 +0200 @@ -38,7 +38,7 @@ provides => { 'Test::Warn' => { file => 'Warn.pm', - version => '0.36', + version => '0.37', }, }, }, diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Test-Warn-0.36/README new/Test-Warn-0.37/README --- old/Test-Warn-0.36/README 2018-06-23 12:00:03.000000000 +0200 +++ new/Test-Warn-0.37/README 2022-08-13 11:11:50.000000000 +0200 @@ -1,4 +1,4 @@ -Test/Warn version 0.36 +Test/Warn version 0.37 ====================== INSTALLATION diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Test-Warn-0.36/Warn.pm new/Test-Warn-0.37/Warn.pm --- old/Test-Warn-0.36/Warn.pm 2018-06-23 11:59:48.000000000 +0200 +++ new/Test-Warn-0.37/Warn.pm 2022-08-13 11:11:34.000000000 +0200 @@ -282,7 +282,7 @@ use Sub::Uplevel 0.12; -our $VERSION = '0.36'; +our $VERSION = '0.37'; require Exporter; @@ -352,15 +352,18 @@ _to_array_if_necessary( shift() || [] ); my $testname = shift; my @got_warning = (); + my $exp_idx = 0; local $SIG{__WARN__} = sub { my ($called_from) = caller(0); # to find out Carping methods my $wrn_text=shift; my $wrn_rec=_canonical_got_warning($called_from, $wrn_text); - foreach my $wrn (@exp_warning) { - if (_cmp_got_to_exp_warning_like($wrn_rec,$wrn)) { - push @got_warning, $wrn_rec; - return; - } + if ( + $exp_idx < @exp_warning and + _cmp_got_to_exp_warning_like($wrn_rec,$exp_warning[$exp_idx]) + ) { + push @got_warning, $wrn_rec; + $exp_idx++; + return; } warn $wrn_text; }; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Test-Warn-0.36/t/warnings_exist.t new/Test-Warn-0.37/t/warnings_exist.t --- old/Test-Warn-0.36/t/warnings_exist.t 2018-05-29 10:44:43.000000000 +0200 +++ new/Test-Warn-0.37/t/warnings_exist.t 2022-08-13 11:06:52.000000000 +0200 @@ -18,16 +18,18 @@ my @expected=( "warn_2 at $file line 12.", 'ok 1', +"warn_1 at $file line 17.", 'ok 2', -"warn_2 at $file line 21.", -'not ok 3', -"warn_2 at $file line 27.", -'ok 4', -"warn_2 at $file line 31.", -'not ok 5', -qr/^Use of uninitialized value (?:\$a\s+)?in addition \(\+\) at \Q$file\E line 36\.$/, -'ok 6', -'1..6' +'ok 3', +"warn_2 at $file line 26.", +'not ok 4', +"warn_2 at $file line 32.", +'ok 5', +"warn_2 at $file line 36.", +'not ok 6', +qr/^Use of uninitialized value (?:\$a\s+)?in addition \(\+\) at \Q$file\E line 41\.$/, +'ok 7', +'1..7' ); foreach my $i (0..$#expected) { if ($expected[$i]=~/^\(\?\^?\w*-?\w*:/) { diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Test-Warn-0.36/t/warnings_exist1.pl new/Test-Warn-0.37/t/warnings_exist1.pl --- old/Test-Warn-0.36/t/warnings_exist1.pl 2018-05-29 10:44:43.000000000 +0200 +++ new/Test-Warn-0.37/t/warnings_exist1.pl 2022-08-13 11:06:52.000000000 +0200 @@ -14,6 +14,11 @@ warnings_exist { warn "warn_1"; + warn "warn_1"; +} [qr/warn_1/]; + +warnings_exist { + warn "warn_1"; warn "warn_2"; } [qr/warn_1/,qr/warn_2/];
