Hello community, here is the log from the commit of package perl-List-AllUtils for openSUSE:Factory checked in at 2013-11-26 19:25:55 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-List-AllUtils (Old) and /work/SRC/openSUSE:Factory/.perl-List-AllUtils.new (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Package is "perl-List-AllUtils" Changes: -------- --- /work/SRC/openSUSE:Factory/perl-List-AllUtils/perl-List-AllUtils.changes 2013-10-21 15:14:01.000000000 +0200 +++ /work/SRC/openSUSE:Factory/.perl-List-AllUtils.new/perl-List-AllUtils.changes 2013-11-26 19:25:56.000000000 +0100 @@ -1,0 +2,11 @@ +Mon Nov 25 07:39:19 UTC 2013 - coolo@suse.com + +- updated to 0.07 + - The last version totally broke all exports from List::MoreUtils. Now there + are actual tests for this. Reported by Tatsuhiko Miyagawa. RT #89509. + - List::Util 1.33 provides some subs that are also provided by + List::MoreUtils. This caused subroutine redefeined warnings. List::AllUtils + now only imports subs from List::MoreUtils that aren't defined by + List::Util. This works with List::Util 1.31+. Reported by Zefram. RT #89467. + +------------------------------------------------------------------- @@ -5,5 +16,5 @@ -+- Really require List::Util 1.31, instead of just saying so in the -+ Changes. Reported by Przemysław Wesołek. RT #88296 -+- Updated to require List::Util 1.31, which includes a bunch of new pairwise -+ functions. -+- Updated docs to match List::MoreUtils 0.28+. Reported by ilmari. RT #75196. + - Really require List::Util 1.31, instead of just saying so in the + Changes. Reported by Przemysław Wesołek. RT #88296 + - Updated to require List::Util 1.31, which includes a bunch of new pairwise + functions. + - Updated docs to match List::MoreUtils 0.28+. Reported by ilmari. RT #75196. Old: ---- List-AllUtils-0.05.tar.gz New: ---- List-AllUtils-0.07.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-List-AllUtils.spec ++++++ --- /var/tmp/diff_new_pack.i7RZ7A/_old 2013-11-26 19:25:56.000000000 +0100 +++ /var/tmp/diff_new_pack.i7RZ7A/_new 2013-11-26 19:25:56.000000000 +0100 @@ -17,7 +17,7 @@ Name: perl-List-AllUtils -Version: 0.05 +Version: 0.07 Release: 0 %define cpan_name List-AllUtils Summary: Combines List::Util and List::MoreUtils in one bite-sized package @@ -32,6 +32,7 @@ BuildRequires: perl(List::MoreUtils) >= 0.28 BuildRequires: perl(List::Util) >= 1.31 BuildRequires: perl(Test::More) >= 0.88 +BuildRequires: perl(Test::Warnings) #BuildRequires: perl(List::AllUtils) Requires: perl(List::MoreUtils) >= 0.28 Requires: perl(List::Util) >= 1.31 ++++++ List-AllUtils-0.05.tar.gz -> List-AllUtils-0.07.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/List-AllUtils-0.05/Changes new/List-AllUtils-0.07/Changes --- old/List-AllUtils-0.05/Changes 2013-08-31 04:54:55.000000000 +0200 +++ new/List-AllUtils-0.07/Changes 2013-10-14 22:58:25.000000000 +0200 @@ -1,3 +1,17 @@ +0.07 2013-10-14 + +- The last version totally broke all exports from List::MoreUtils. Now there + are actual tests for this. Reported by Tatsuhiko Miyagawa. RT #89509. + + +0.06 2013-10-14 + +- List::Util 1.33 provides some subs that are also provided by + List::MoreUtils. This caused subroutine redefeined warnings. List::AllUtils + now only imports subs from List::MoreUtils that aren't defined by + List::Util. This works with List::Util 1.31+. Reported by Zefram. RT #89467. + + 0.05 2013-08-30 - Really require List::Util 1.31, instead of just saying so in the diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/List-AllUtils-0.05/META.json new/List-AllUtils-0.07/META.json --- old/List-AllUtils-0.05/META.json 2013-08-31 04:54:55.000000000 +0200 +++ new/List-AllUtils-0.07/META.json 2013-10-14 22:58:25.000000000 +0200 @@ -4,7 +4,7 @@ "Dave Rolsky <autarch@urth.org>" ], "dynamic_config" : 0, - "generated_by" : "Dist::Zilla version 4.300037, CPAN::Meta::Converter version 2.131560", + "generated_by" : "Dist::Zilla version 4.300039, CPAN::Meta::Converter version 2.131560", "license" : [ "artistic_2" ], @@ -41,7 +41,8 @@ "requires" : { "File::Find" : "0", "File::Temp" : "0", - "Test::More" : "0.88" + "Test::More" : "0.88", + "Test::Warnings" : "0" } } }, @@ -58,7 +59,7 @@ "web" : "http://git.urth.org/List-AllUtils.git" } }, - "version" : "0.05", + "version" : "0.07", "x_authority" : "cpan:DROLSKY" } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/List-AllUtils-0.05/META.yml new/List-AllUtils-0.07/META.yml --- old/List-AllUtils-0.05/META.yml 2013-08-31 04:54:55.000000000 +0200 +++ new/List-AllUtils-0.07/META.yml 2013-10-14 22:58:25.000000000 +0200 @@ -6,10 +6,11 @@ File::Find: 0 File::Temp: 0 Test::More: 0.88 + Test::Warnings: 0 configure_requires: ExtUtils::MakeMaker: 6.30 dynamic_config: 0 -generated_by: 'Dist::Zilla version 4.300037, CPAN::Meta::Converter version 2.131560' +generated_by: 'Dist::Zilla version 4.300039, CPAN::Meta::Converter version 2.131560' license: artistic_2 meta-spec: url: http://module-build.sourceforge.net/META-spec-v1.4.html @@ -26,5 +27,5 @@ bugtracker: http://rt.cpan.org/Public/Dist/Display.html?Name=List-AllUtils homepage: http://metacpan.org/release/List-AllUtils repository: git://git.urth.org/List-AllUtils.git -version: 0.05 +version: 0.07 x_authority: cpan:DROLSKY diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/List-AllUtils-0.05/Makefile.PL new/List-AllUtils-0.07/Makefile.PL --- old/List-AllUtils-0.05/Makefile.PL 2013-08-31 04:54:55.000000000 +0200 +++ new/List-AllUtils-0.07/Makefile.PL 2013-10-14 22:58:25.000000000 +0200 @@ -30,9 +30,10 @@ "TEST_REQUIRES" => { "File::Find" => 0, "File::Temp" => 0, - "Test::More" => "0.88" + "Test::More" => "0.88", + "Test::Warnings" => 0 }, - "VERSION" => "0.05", + "VERSION" => "0.07", "test" => { "TESTS" => "t/*.t" } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/List-AllUtils-0.05/README new/List-AllUtils-0.07/README --- old/List-AllUtils-0.05/README 2013-08-31 04:54:55.000000000 +0200 +++ new/List-AllUtils-0.07/README 2013-10-14 22:58:25.000000000 +0200 @@ -1,7 +1,7 @@ This archive contains the distribution List-AllUtils, -version 0.05: +version 0.07: Combines List::Util and List::MoreUtils in one bite-sized package diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/List-AllUtils-0.05/dist.ini new/List-AllUtils-0.07/dist.ini --- old/List-AllUtils-0.05/dist.ini 2013-08-31 04:54:55.000000000 +0200 +++ new/List-AllUtils-0.07/dist.ini 2013-10-14 22:58:25.000000000 +0200 @@ -3,7 +3,7 @@ license = Artistic_2_0 copyright_holder = Dave Rolsky -version = 0.05 +version = 0.07 [@DROLSKY] dist = List-AllUtils diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/List-AllUtils-0.05/lib/List/AllUtils.pm new/List-AllUtils-0.07/lib/List/AllUtils.pm --- old/List-AllUtils-0.05/lib/List/AllUtils.pm 2013-08-31 04:54:55.000000000 +0200 +++ new/List-AllUtils-0.07/lib/List/AllUtils.pm 2013-10-14 22:58:25.000000000 +0200 @@ -1,6 +1,6 @@ package List::AllUtils; { - $List::AllUtils::VERSION = '0.05'; + $List::AllUtils::VERSION = '0.07'; } BEGIN { $List::AllUtils::AUTHORITY = 'cpan:DROLSKY'; @@ -10,12 +10,16 @@ use warnings; # List::Util does not define an :all tag -BEGIN -{ +BEGIN { use List::Util 1.31 (); - List::Util->import( @List::Util::EXPORT_OK ); + List::Util->import(@List::Util::EXPORT_OK); + + use List::MoreUtils 0.28; + + my %imported = map { $_ => 1 } @List::Util::EXPORT_OK; + List::MoreUtils->import( grep { !$imported{$_} } + @{ $List::MoreUtils::EXPORT_TAGS{all} } ); } -use List::MoreUtils 0.28 qw( :all ); use base 'Exporter'; @@ -23,7 +27,6 @@ our %EXPORT_TAGS = ( all => @EXPORT_OK ); - 1; # ABSTRACT: Combines List::Util and List::MoreUtils in one bite-sized package @@ -38,7 +41,7 @@ =head1 VERSION -version 0.05 +version 0.07 =head1 SYNOPSIS diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/List-AllUtils-0.05/t/01-basic.t new/List-AllUtils-0.07/t/01-basic.t --- old/List-AllUtils-0.05/t/01-basic.t 2013-08-31 04:54:55.000000000 +0200 +++ new/List-AllUtils-0.07/t/01-basic.t 2013-10-14 22:58:25.000000000 +0200 @@ -1,10 +1,17 @@ use strict; use warnings; +# This is needed to produce sub redefined warnings from List::AllUtils when +# List::Util and List::MoreUtils export some of the same subs. I'm not sure +# why. +BEGIN { + $^W++; +} + use Test::More 0.88; +use Test::Warnings; { - package Foo; use List::AllUtils; @@ -13,26 +20,66 @@ ok( !Foo->can('first'), 'no exports by default' ); { - package Bar; - use List::AllUtils qw( first any ); + use List::AllUtils qw( first any apply ); + + sub test_first { + return first { $_ > 1 } @_; + } + + sub test_apply { + return apply { $_ *= 2 } @_; + } } ok( Bar->can('first'), 'explicitly import first' ); ok( Bar->can('any'), 'explicitly import any' ); +ok( Bar->can('apply'), 'explicitly import apply' ); ok( !Bar->can('all'), 'did not import all' ); -{ +is( + Bar::test_first( 1, 2, 3 ), + 2, + 'Bar::test_first returns expected value' +); + +is_deeply( + [ Bar::test_apply( 1, 2, 3 ) ], + [ 2, 4, 6 ], + 'Bar::test_apply returns expected list' +); +{ package Baz; use List::AllUtils qw( :all ); + + sub test_first { + return first { $_ > 1 } @_; + } + + sub test_apply { + return apply { $_ *= 2 } @_; + } } ok( Baz->can('first'), 'imported everything, got first' ); ok( Baz->can('any'), 'imported everything, got any' ); ok( Baz->can('all'), 'imported everything, got all' ); +ok( Baz->can('apply'), 'imported everything, got apply' ); + +is( + Baz::test_first( 1, 2, 3 ), + 2, + 'Baz::test_first returns expected value' +); + +is_deeply( + [ Baz::test_apply( 1, 2, 3 ) ], + [ 2, 4, 6 ], + 'Baz::test_apply returns expected list' +); is( ( List::AllUtils::first { $_ > 5 } ( 1, 2, 5, 22, 7 ) ), -- To unsubscribe, e-mail: opensuse-commit+unsubscribe@opensuse.org For additional commands, e-mail: opensuse-commit+help@opensuse.org