Script 'mail_helper' called by obssrc Hello community, here is the log from the commit of package perl-Scope-Upper for openSUSE:Factory checked in at 2023-04-03 17:47:22 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-Scope-Upper (Old) and /work/SRC/openSUSE:Factory/.perl-Scope-Upper.new.9019 (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-Scope-Upper" Mon Apr 3 17:47:22 2023 rev:15 rq:1076997 version:0.34 Changes: -------- --- /work/SRC/openSUSE:Factory/perl-Scope-Upper/perl-Scope-Upper.changes 2022-01-03 10:50:30.219605359 +0100 +++ /work/SRC/openSUSE:Factory/.perl-Scope-Upper.new.9019/perl-Scope-Upper.changes 2023-04-03 17:47:35.994894485 +0200 @@ -1,0 +2,19 @@ +Mon Mar 27 03:07:57 UTC 2023 - Tina Müller <timueller+p...@suse.de> + +- updated to 0.34 + see /usr/share/doc/packages/perl-Scope-Upper/Changes + + 0.34 2023-03-26 16:00 UTC + + Add : Contributing guidelines are now listed in the new + CONTRIBUTING file. + + Fix : [RT #146897] Scope::Upper does not know about RCPV + cop_warnings, and does not know that given is deprecated. + "given" related warnings were silenced, and the new RCPV + interface is now used. + Thanks Yves Orton for reporting and contributing a fix. + + Fix : Assertion failures triggering on perl version 5.37.10 and + higher with DEBUGGING enabled. + + Fix : t/64-uplevel-caller.t has been taught about the new call frame + numbering convention. + +------------------------------------------------------------------- Old: ---- Scope-Upper-0.33.tar.gz New: ---- Scope-Upper-0.34.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-Scope-Upper.spec ++++++ --- /var/tmp/diff_new_pack.myJTRa/_old 2023-04-03 17:47:36.570898729 +0200 +++ /var/tmp/diff_new_pack.myJTRa/_new 2023-04-03 17:47:36.574898758 +0200 @@ -1,7 +1,7 @@ # # spec file for package perl-Scope-Upper # -# Copyright (c) 2021 SUSE LLC +# Copyright (c) 2023 SUSE LLC # # All modifications and additions to the file contributed by third parties # remain the property of their copyright owners, unless otherwise agreed @@ -18,10 +18,10 @@ %define cpan_name Scope-Upper Name: perl-Scope-Upper -Version: 0.33 +Version: 0.34 Release: 0 -Summary: Act on upper scopes License: Artistic-1.0 OR GPL-1.0-or-later +Summary: Act on upper scopes URL: https://metacpan.org/release/%{cpan_name} Source0: https://cpan.metacpan.org/authors/id/V/VP/VPIT/%{cpan_name}-%{version}.tar.gz Source1: cpanspec.yml @@ -63,6 +63,6 @@ %perl_gen_filelist %files -f %{name}.files -%doc Changes README samples +%doc Changes CONTRIBUTING README samples %changelog ++++++ Scope-Upper-0.33.tar.gz -> Scope-Upper-0.34.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Scope-Upper-0.33/CONTRIBUTING new/Scope-Upper-0.34/CONTRIBUTING --- old/Scope-Upper-0.33/CONTRIBUTING 1970-01-01 01:00:00.000000000 +0100 +++ new/Scope-Upper-0.34/CONTRIBUTING 2023-03-26 15:18:15.000000000 +0200 @@ -0,0 +1,39 @@ +Contributing guildelines for the Scope-Upper distribution + +Patch submissions guidelines : +- Patches VERY MUCH SHOULD be generated with "git format-patch". + If that's really not possible, make sure your patches apply cleanly in the + distribution directory. +- Single patches MUST be submitted to the bugtracker. + Open a ticket and add your patch as an attachment. +- Series of patches CAN be submitted as a public feature branch. + You can clone the directory wherever you want and point me to your remote + branch as long as I don't need to log in. + +C/XS-related guidelines : +- C code MUST be kept ANSI-compliant. + Older perl versions may have been built with a C compiler that does not + support C99 features (plus they are mostly useless except for restrict). + In particular, this means no C99 comments, no mixed declaration and code, + and no C++ void* casts. +- XS code MUST be buildable with any perl matching the META requirements. + If needed, wrap your code around with the XSH_HAS_PERL(x, y, z) macro. + +Tests-related guidelines : +- Patches MUST be tested before being sent. + Make sure the distribution builds and tests correctly. +- Patches that add version-specific code MUST be tested with at least + one perl release matching each version interval. + That is, if you add new code specific to perl 5.34 and above, then you + have to test it with a pre-5.34 perl (e.g. 5.32) and a post-5.34 perl + (e.g. 5.34). +- C/XS patches MUST be tested with a threaded perl regardless of how much you + dislike perl threads. + Testing with a threaded perl makes sure your code can build in many more + situations. Memory issues are also more easily spotted. +- Bugfixes SHOULD come with a regression test. + Add it to an existing .t file or create your own. + +What you don't need to do : +- DON'T update the Changes file. +- DON'T run author tests. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Scope-Upper-0.33/Changes new/Scope-Upper-0.34/Changes --- old/Scope-Upper-0.33/Changes 2021-12-20 21:23:51.000000000 +0100 +++ new/Scope-Upper-0.34/Changes 2023-03-26 17:50:09.000000000 +0200 @@ -1,5 +1,18 @@ Revision history for Scope-Upper +0.34 2023-03-26 16:00 UTC + + Add : Contributing guidelines are now listed in the new + CONTRIBUTING file. + + Fix : [RT #146897] Scope::Upper does not know about RCPV + cop_warnings, and does not know that given is deprecated. + "given" related warnings were silenced, and the new RCPV + interface is now used. + Thanks Yves Orton for reporting and contributing a fix. + + Fix : Assertion failures triggering on perl version 5.37.10 and + higher with DEBUGGING enabled. + + Fix : t/64-uplevel-caller.t has been taught about the new call frame + numbering convention. + 0.33 2021-12-20 20:30 UTC + Fix : [RT #114816] resources/remote/url points to web interface META files now follow version 2.0 of the CPAN META spec. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Scope-Upper-0.33/MANIFEST new/Scope-Upper-0.34/MANIFEST --- old/Scope-Upper-0.33/MANIFEST 2021-12-20 19:10:52.000000000 +0100 +++ new/Scope-Upper-0.34/MANIFEST 2023-03-26 14:59:22.000000000 +0200 @@ -1,3 +1,4 @@ +CONTRIBUTING Changes MANIFEST META.json diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Scope-Upper-0.33/META.json new/Scope-Upper-0.34/META.json --- old/Scope-Upper-0.33/META.json 2021-12-20 21:26:19.000000000 +0100 +++ new/Scope-Upper-0.34/META.json 2023-03-26 17:51:24.000000000 +0200 @@ -4,7 +4,7 @@ "Vincent Pit <v...@cpan.org>" ], "dynamic_config" : 1, - "generated_by" : "ExtUtils::MakeMaker version 7.62, CPAN::Meta::Converter version 2.150010", + "generated_by" : "ExtUtils::MakeMaker version 7.66, CPAN::Meta::Converter version 2.150010", "license" : [ "perl_5" ], @@ -61,6 +61,6 @@ "web" : "http://git.vpit.fr/?p=perl%2Fmodules%2FScope-Upper.git" } }, - "version" : "0.33", - "x_serialization_backend" : "JSON::PP version 4.06" + "version" : "0.34", + "x_serialization_backend" : "JSON::PP version 4.16" } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Scope-Upper-0.33/META.yml new/Scope-Upper-0.34/META.yml --- old/Scope-Upper-0.33/META.yml 2021-12-20 21:26:18.000000000 +0100 +++ new/Scope-Upper-0.34/META.yml 2023-03-26 17:51:24.000000000 +0200 @@ -13,7 +13,7 @@ configure_requires: ExtUtils::MakeMaker: '0' dynamic_config: 1 -generated_by: 'ExtUtils::MakeMaker version 7.62, CPAN::Meta::Converter version 2.150010' +generated_by: 'ExtUtils::MakeMaker version 7.66, CPAN::Meta::Converter version 2.150010' license: perl meta-spec: url: http://module-build.sourceforge.net/META-spec-v1.4.html @@ -33,5 +33,5 @@ homepage: http://search.cpan.org/dist/Scope-Upper/ license: http://dev.perl.org/licenses/ repository: http://git.vpit.fr/perl/modules/Scope-Upper.git/ -version: '0.33' +version: '0.34' x_serialization_backend: 'CPAN::Meta::YAML version 0.018' diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Scope-Upper-0.33/README new/Scope-Upper-0.34/README --- old/Scope-Upper-0.33/README 2021-12-20 21:26:19.000000000 +0100 +++ new/Scope-Upper-0.34/README 2023-03-26 17:51:24.000000000 +0200 @@ -2,7 +2,7 @@ Scope::Upper - Act on upper scopes. VERSION - Version 0.33 + Version 0.34 SYNOPSIS "reap", "localize", "localize_elem", "localize_delete" and "WORDS" : @@ -824,8 +824,8 @@ COPYRIGHT & LICENSE Copyright - 2008,2009,2010,2011,2012,2013,2014,2015,2016,2017,2018,2019,2021 Vincent - Pit, all rights reserved. + 2008,2009,2010,2011,2012,2013,2014,2015,2016,2017,2018,2019,2021,2023 + Vincent Pit, all rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Scope-Upper-0.33/Upper.xs new/Scope-Upper-0.34/Upper.xs --- old/Scope-Upper-0.33/Upper.xs 2021-12-20 21:16:34.000000000 +0100 +++ new/Scope-Upper-0.34/Upper.xs 2023-03-26 16:25:30.000000000 +0200 @@ -2034,9 +2034,11 @@ AvFILLp(av) = fill; } +#if !XSH_HAS_PERL(5, 37, 10) /* should be referenced by PL_curpad[0] and *_ */ assert(SvREFCNT(PL_curpad[0]) > 1); SvREFCNT_dec(PL_curpad[0]); +#endif PL_curpad[0] = (SV *) av; } @@ -3136,7 +3138,9 @@ /* warnings (9) */ { SV *mask = NULL; -#if XSH_HAS_PERL(5, 9, 4) +#if XSH_HAS_PERL(5, 37, 6) + char *old_warnings = cop->cop_warnings; +#elif XSH_HAS_PERL(5, 9, 4) STRLEN *old_warnings = cop->cop_warnings; #else SV *old_warnings = cop->cop_warnings; @@ -3169,7 +3173,9 @@ if (!mask) mask = su_newmortal_pvn(WARN_ALLstring, WARNsize); } else { -#if XSH_HAS_PERL(5, 9, 4) +#if XSH_HAS_PERL(5, 37, 6) + mask = su_newmortal_pvn((char *) old_warnings, RCPV_LEN(old_warnings)); +#elif XSH_HAS_PERL(5, 9, 4) mask = su_newmortal_pvn((char *) (old_warnings + 1), old_warnings[0]); #else mask = sv_mortalcopy(old_warnings); diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Scope-Upper-0.33/lib/Scope/Upper.pm new/Scope-Upper-0.34/lib/Scope/Upper.pm --- old/Scope-Upper-0.33/lib/Scope/Upper.pm 2021-12-20 21:25:49.000000000 +0100 +++ new/Scope-Upper-0.34/lib/Scope/Upper.pm 2023-03-26 17:50:16.000000000 +0200 @@ -11,13 +11,13 @@ =head1 VERSION -Version 0.33 +Version 0.34 =cut our $VERSION; BEGIN { - $VERSION = '0.33'; + $VERSION = '0.34'; } =head1 SYNOPSIS @@ -865,7 +865,7 @@ =head1 COPYRIGHT & LICENSE -Copyright 2008,2009,2010,2011,2012,2013,2014,2015,2016,2017,2018,2019,2021 Vincent Pit, all rights reserved. +Copyright 2008,2009,2010,2011,2012,2013,2014,2015,2016,2017,2018,2019,2021,2023 Vincent Pit, all rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Scope-Upper-0.33/t/05-words.t new/Scope-Upper-0.34/t/05-words.t --- old/Scope-Upper-0.33/t/05-words.t 2021-12-20 21:16:34.000000000 +0100 +++ new/Scope-Upper-0.34/t/05-words.t 2023-03-26 14:10:08.000000000 +0200 @@ -339,8 +339,11 @@ is $var, 1, 'subst : do block preserved' unless $^P; SKIP: { - skip 'Perl 5.10 required to test given/when' => 4 * ($^P ? 4 : 5) + 4 - if "$]" < 5.010; + my $skip_count = 4 * ($^P ? 4 : 5) + 4; + skip 'Perl 5.10 required to test given/when' + => $skip_count if "$]" < 5.010; + skip 'Not testing deprecated given/when on Perl 5.37.10 or later' + => $skip_count if "$]" >= 5.037010; eval <<'TEST_GIVEN'; BEGIN { diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Scope-Upper-0.33/t/13-reap-ctl.t new/Scope-Upper-0.34/t/13-reap-ctl.t --- old/Scope-Upper-0.33/t/13-reap-ctl.t 2021-12-20 21:16:34.000000000 +0100 +++ new/Scope-Upper-0.34/t/13-reap-ctl.t 2023-03-26 14:10:08.000000000 +0200 @@ -138,6 +138,8 @@ SKIP: { skip 'Perl 5.10 required to test given/when' => 30 if "$]" < 5.010; + skip 'Not testing deprecated given/when on Perl 5.37.10 or later' + => 30 if "$]" >= 5.037010; eval <<' GIVEN_TEST_1'; BEGIN { diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Scope-Upper-0.33/t/23-localize-ctl.t new/Scope-Upper-0.34/t/23-localize-ctl.t --- old/Scope-Upper-0.33/t/23-localize-ctl.t 2021-12-20 21:16:34.000000000 +0100 +++ new/Scope-Upper-0.34/t/23-localize-ctl.t 2023-03-26 14:10:08.000000000 +0200 @@ -191,6 +191,8 @@ SKIP: { skip 'Perl 5.10 required to test given/when' => 30 if "$]" < 5.010; + skip 'Not testing deprecated given/when on Perl 5.37.10 or later' + => 30 if "$]" >= 5.037010; eval <<' GIVEN_TEST_1'; BEGIN { diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Scope-Upper-0.33/t/55-yield-target.t new/Scope-Upper-0.34/t/55-yield-target.t --- old/Scope-Upper-0.33/t/55-yield-target.t 2021-12-20 21:16:34.000000000 +0100 +++ new/Scope-Upper-0.34/t/55-yield-target.t 2023-03-26 14:10:08.000000000 +0200 @@ -81,6 +81,8 @@ SKIP: { skip 'perl 5.10 is required to test interaction with given/when' => 6 if "$]" < 5.010; + skip 'Not testing deprecated given/when on Perl 5.37.10 or later' + => 6 if "$]" >= 5.037010; @res = eval <<'TESTCASE'; BEGIN { diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Scope-Upper-0.33/t/64-uplevel-caller.t new/Scope-Upper-0.34/t/64-uplevel-caller.t --- old/Scope-Upper-0.33/t/64-uplevel-caller.t 2021-12-20 21:16:34.000000000 +0100 +++ new/Scope-Upper-0.34/t/64-uplevel-caller.t 2023-03-26 17:23:32.000000000 +0200 @@ -12,14 +12,18 @@ my $i = 1; my @stack; while (1) { - my @c = $check_args ? do { package DB; caller($i++) } - : caller($i++); + my @c = $check_args ? do { + my $frame = ("$]" >= 5.037_010) ? ($i + 1) : $i; + package DB; + caller($frame) + } : caller($i); last unless @c; if ($check_args) { my $args = $c[4] ? [ @DB::args ] : undef; push @c, $args; } push @stack, \@c; + ++$i; } return \@stack; } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Scope-Upper-0.33/t/lib/Scope/Upper/TestGenerator.pm new/Scope-Upper-0.34/t/lib/Scope/Upper/TestGenerator.pm --- old/Scope-Upper-0.33/t/lib/Scope/Upper/TestGenerator.pm 2021-12-20 21:16:34.000000000 +0100 +++ new/Scope-Upper-0.34/t/lib/Scope/Upper/TestGenerator.pm 2023-03-26 14:10:08.000000000 +0200 @@ -32,7 +32,7 @@ [ 'eval q[', '];' ], ); -push @blocks, [ 'given (1) {', '}' ] if "$]" >= 5.010_001; +push @blocks, [ 'given (1) {', '}' ] if "$]" >= 5.010_001 and "$]" < 5.037_010; my %exports = ( verbose_is => \&verbose_is,