diff options
author | intrigeri <intrigeri@boum.org> | 2019-07-21 20:52:35 +0000 |
---|---|---|
committer | intrigeri <intrigeri@boum.org> | 2019-07-21 20:52:35 +0000 |
commit | 81e73631358e48416982609cb070ba74db698472 (patch) | |
tree | 57df625e168710bcda7cc5fe5aeb8c0c12062ee4 | |
parent | 5b872012946d2c344f20e2e6648ca2098dd8b755 (diff) | |
parent | e8c595ab7e79915e5b5a5c34a02e660db4f715aa (diff) |
Update upstream source from tag 'upstream/0.32'
Update to upstream version '0.32'
with Debian dir 43f1aa956bb3a5215dd362c8717933f00b2b715d
-rw-r--r-- | Changes | 6 | ||||
-rw-r--r-- | META.json | 8 | ||||
-rw-r--r-- | META.yml | 6 | ||||
-rw-r--r-- | Makefile.PL | 4 | ||||
-rw-r--r-- | README | 8 | ||||
-rw-r--r-- | Upper.xs | 11 | ||||
-rw-r--r-- | lib/Scope/Upper.pm | 8 | ||||
-rw-r--r-- | t/lib/Test/Leaner.pm | 4 | ||||
-rw-r--r-- | t/lib/VPIT/TestHelpers.pm | 4 |
9 files changed, 35 insertions, 24 deletions
@@ -1,5 +1,11 @@ Revision history for Scope-Upper +0.32 2019-07-08 12:50 UTC + + Fix : [RT #129539] : fails with v5.27.3 and later with DEBUGGING + The module has been amended to accomodate with a change of + behaviour of a core macro. + + Upd : Contact info. + 0.31 2018-08-26 19:50 UTC + Fix : [RT #125931] : localized SCALAR doesn't get imported localize '$Foo::x' => $var now properly imports $x into Foo. @@ -1,7 +1,7 @@ { "abstract" : "Act on upper scopes.", "author" : [ - "Vincent Pit <perl@profvince.com>" + "Vincent Pit <vpit@cpan.org>" ], "dynamic_config" : 1, "generated_by" : "ExtUtils::MakeMaker version 7.34, CPAN::Meta::Converter version 2.150010", @@ -56,9 +56,9 @@ "http://dev.perl.org/licenses/" ], "repository" : { - "url" : "http://git.profvince.com/?p=perl%2Fmodules%2FScope-Upper.git" + "url" : "http://git.vpit.fr/?p=perl%2Fmodules%2FScope-Upper.git" } }, - "version" : "0.31", - "x_serialization_backend" : "JSON::PP version 2.97001" + "version" : "0.32", + "x_serialization_backend" : "JSON::PP version 4.02" } @@ -1,7 +1,7 @@ --- abstract: 'Act on upper scopes.' author: - - 'Vincent Pit <perl@profvince.com>' + - 'Vincent Pit <vpit@cpan.org>' build_requires: Config: '0' Exporter: '0' @@ -33,6 +33,6 @@ resources: bugtracker: http://rt.cpan.org/Dist/Display.html?Name=Scope-Upper homepage: http://search.cpan.org/dist/Scope-Upper/ license: http://dev.perl.org/licenses/ - repository: http://git.profvince.com/?p=perl%2Fmodules%2FScope-Upper.git -version: '0.31' + repository: http://git.vpit.fr/?p=perl%2Fmodules%2FScope-Upper.git +version: '0.32' x_serialization_backend: 'CPAN::Meta::YAML version 0.018' diff --git a/Makefile.PL b/Makefile.PL index 787889a..396ccec 100644 --- a/Makefile.PL +++ b/Makefile.PL @@ -113,13 +113,13 @@ my %META = ( bugtracker => "http://rt.cpan.org/Dist/Display.html?Name=$dist", homepage => "http://search.cpan.org/dist/$dist/", license => 'http://dev.perl.org/licenses/', - repository => "http://git.profvince.com/?p=perl%2Fmodules%2F$dist.git", + repository => "http://git.vpit.fr/?p=perl%2Fmodules%2F$dist.git", }, ); WriteMakefile( NAME => $name, - AUTHOR => 'Vincent Pit <perl@profvince.com>', + AUTHOR => 'Vincent Pit <vpit@cpan.org>', LICENSE => 'perl', VERSION_FROM => $file, ABSTRACT_FROM => $file, @@ -2,7 +2,7 @@ NAME Scope::Upper - Act on upper scopes. VERSION - Version 0.31 + Version 0.32 SYNOPSIS "reap", "localize", "localize_elem", "localize_delete" and "WORDS" : @@ -797,7 +797,7 @@ SEE ALSO Scope::Escape. AUTHOR - Vincent Pit, "<perl at profvince.com>", <http://www.profvince.com>. + Vincent Pit "<vpit at cpan.org>". You can contact me by mail or on "irc.perl.org" (vincent). @@ -823,8 +823,8 @@ ACKNOWLEDGEMENTS Thanks to Shawn M. Moore for motivation. COPYRIGHT & LICENSE - Copyright 2008,2009,2010,2011,2012,2013,2014,2015,2016,2017,2018 Vincent - Pit, all rights reserved. + Copyright 2008,2009,2010,2011,2012,2013,2014,2015,2016,2017,2018,2019 + 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. @@ -2022,12 +2022,17 @@ static int su_uplevel_runops_hook_entersub(pTHX) { */ assert(sud); if (sud->argarray) { + I32 fill; AV *av = newAV(); AvREAL_off(av); AvREIFY_on(av); - av_extend(av, AvMAX(sud->argarray)); - AvFILLp(av) = AvFILLp(sud->argarray); - Copy(AvARRAY(sud->argarray), AvARRAY(av), AvFILLp(av) + 1, SV *); + + fill = AvFILLp(sud->argarray); + if (fill >= 0) { + av_extend(av, fill); + Copy(AvARRAY(sud->argarray), AvARRAY(av), fill + 1, SV *); + AvFILLp(av) = fill; + } /* should be referenced by PL_curpad[0] and *_ */ assert(SvREFCNT(PL_curpad[0]) > 1); diff --git a/lib/Scope/Upper.pm b/lib/Scope/Upper.pm index ce67708..690aa5b 100644 --- a/lib/Scope/Upper.pm +++ b/lib/Scope/Upper.pm @@ -11,13 +11,13 @@ Scope::Upper - Act on upper scopes. =head1 VERSION -Version 0.31 +Version 0.32 =cut our $VERSION; BEGIN { - $VERSION = '0.31'; + $VERSION = '0.32'; } =head1 SYNOPSIS @@ -839,7 +839,7 @@ L<Scope::Escape>. =head1 AUTHOR -Vincent Pit, C<< <perl at profvince.com> >>, L<http://www.profvince.com>. +Vincent Pit C<< <vpit at cpan.org> >>. You can contact me by mail or on C<irc.perl.org> (vincent). @@ -865,7 +865,7 @@ Thanks to Shawn M. Moore for motivation. =head1 COPYRIGHT & LICENSE -Copyright 2008,2009,2010,2011,2012,2013,2014,2015,2016,2017,2018 Vincent Pit, all rights reserved. +Copyright 2008,2009,2010,2011,2012,2013,2014,2015,2016,2017,2018,2019 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 --git a/t/lib/Test/Leaner.pm b/t/lib/Test/Leaner.pm index 9944e25..04984d7 100644 --- a/t/lib/Test/Leaner.pm +++ b/t/lib/Test/Leaner.pm @@ -914,7 +914,7 @@ L<Exporter>, L<Test::More>. =head1 AUTHOR -Vincent Pit, C<< <perl at profvince.com> >>, L<http://www.profvince.com>. +Vincent Pit C<< <vpit at cpan.org> >>. You can contact me by mail or on C<irc.perl.org> (vincent). @@ -931,7 +931,7 @@ You can find documentation for this module with the perldoc command. =head1 COPYRIGHT & LICENSE -Copyright 2010,2011,2013 Vincent Pit, all rights reserved. +Copyright 2010,2011,2013,2019 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 --git a/t/lib/VPIT/TestHelpers.pm b/t/lib/VPIT/TestHelpers.pm index f47bee1..aeabc16 100644 --- a/t/lib/VPIT/TestHelpers.pm +++ b/t/lib/VPIT/TestHelpers.pm @@ -837,11 +837,11 @@ sub DESTROY { $_[0]->{code}->() } =head1 AUTHOR -Vincent Pit, C<< <perl at profvince.com> >>, L<http://www.profvince.com>. +Vincent Pit C<< <vpit at cpan.org> >>. =head1 COPYRIGHT & LICENSE -Copyright 2012,2013,2014,2015 Vincent Pit, all rights reserved. +Copyright 2012,2013,2014,2015,2019 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. |