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 <[email protected]>
+
+- 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 <[email protected]>"
],
"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,
