Hello community, here is the log from the commit of package perl-Test-Exception for openSUSE:Factory checked in at 2015-02-11 16:32:00 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-Test-Exception (Old) and /work/SRC/openSUSE:Factory/.perl-Test-Exception.new (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-Test-Exception" Changes: -------- --- /work/SRC/openSUSE:Factory/perl-Test-Exception/perl-Test-Exception.changes 2013-06-06 13:31:39.000000000 +0200 +++ /work/SRC/openSUSE:Factory/.perl-Test-Exception.new/perl-Test-Exception.changes 2015-02-11 16:32:01.000000000 +0100 @@ -1,0 +2,15 @@ +Fri Feb 6 13:13:00 UTC 2015 - co...@suse.com + +- updated to 0.36 + - Fix bug when Test::More has been downgraded + + 0.35 [2014-09-20] + - Fix a bug when Test::Builder isn't new (better version). + + 0.34 [2014-09-20] + - Fix a bug when Test::Builder isn't new. + + 0.33 [2014-09-19] Or "Another Test-Simple change" + - Fixed test broken by changes in Test::Builder and friends + +------------------------------------------------------------------- Old: ---- Test-Exception-0.32.tar.gz New: ---- Test-Exception-0.36.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-Test-Exception.spec ++++++ --- /var/tmp/diff_new_pack.Y7ZNzC/_old 2015-02-11 16:32:02.000000000 +0100 +++ /var/tmp/diff_new_pack.Y7ZNzC/_new 2015-02-11 16:32:02.000000000 +0100 @@ -1,7 +1,7 @@ # # spec file for package perl-Test-Exception # -# Copyright (c) 2013 SUSE LINUX Products GmbH, Nuernberg, Germany. +# Copyright (c) 2015 SUSE LINUX GmbH, Nuernberg, Germany. # # All modifications and additions to the file contributed by third parties # remain the property of their copyright owners, unless otherwise agreed @@ -17,26 +17,24 @@ Name: perl-Test-Exception -Version: 0.32 +Version: 0.36 Release: 0 %define cpan_name Test-Exception Summary: Test exception based code License: Artistic-1.0 or GPL-1.0+ Group: Development/Libraries/Perl Url: http://search.cpan.org/dist/Test-Exception/ -Source: http://www.cpan.org/authors/id/A/AD/ADIE/%{cpan_name}-%{version}.tar.gz +Source: http://www.cpan.org/authors/id/E/EX/EXODIST/%{cpan_name}-%{version}.tar.gz BuildArch: noarch BuildRoot: %{_tmppath}/%{name}-%{version}-build BuildRequires: perl BuildRequires: perl-macros -BuildRequires: perl(Module::Build) >= 0.38 +BuildRequires: perl(Module::Build) >= 0.42 BuildRequires: perl(Sub::Uplevel) >= 0.18 BuildRequires: perl(Test::Builder) >= 0.7 BuildRequires: perl(Test::Builder::Tester) >= 1.07 BuildRequires: perl(Test::More) >= 0.7 BuildRequires: perl(Test::Simple) >= 0.7 -#BuildRequires: perl(Local::Error::Simple) -#BuildRequires: perl(Test::Exception) Requires: perl(Sub::Uplevel) >= 0.18 Requires: perl(Test::Builder) >= 0.7 Requires: perl(Test::Builder::Tester) >= 1.07 @@ -52,6 +50,9 @@ If you are not already familiar with the Test::More manpage now would be the time to go take a look. +You can specify the test plan when you 'use Test::Exception' in the same +way as 'use Test::More'. See the Test::More manpage for details. + %prep %setup -q -n %{cpan_name}-%{version} find . -type f -print0 | xargs -0 chmod 644 ++++++ Test-Exception-0.32.tar.gz -> Test-Exception-0.36.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Test-Exception-0.32/Changes new/Test-Exception-0.36/Changes --- old/Test-Exception-0.32/Changes 2013-04-28 02:02:17.000000000 +0200 +++ new/Test-Exception-0.36/Changes 2015-01-08 17:50:39.000000000 +0100 @@ -1,5 +1,17 @@ Revision history for Perl extension Test::Exception: +0.36 [2015-01-08] + - Fix bug when Test::More has been downgraded + +0.35 [2014-09-20] + - Fix a bug when Test::Builder isn't new (better version). + +0.34 [2014-09-20] + - Fix a bug when Test::Builder isn't new. + +0.33 [2014-09-19] Or "Another Test-Simple change" + - Fixed test broken by changes in Test::Builder and friends + 0.32 [2013-04-28] Or the "prepping for upcoming Test::Simple 0.99" release - Fixed tests that broke due to Test::More diagnostic changes diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Test-Exception-0.32/MANIFEST new/Test-Exception-0.36/MANIFEST --- old/Test-Exception-0.32/MANIFEST 2013-04-28 02:02:17.000000000 +0200 +++ new/Test-Exception-0.36/MANIFEST 2015-01-08 17:50:39.000000000 +0100 @@ -2,7 +2,6 @@ Changes lib/Test/Exception.pm MANIFEST This list of files -README t/caller.t t/edge-cases.t t/Exception.t @@ -20,5 +19,6 @@ xt/pod.t xt/spelling.t Makefile.PL +README META.yml META.json diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Test-Exception-0.32/META.json new/Test-Exception-0.36/META.json --- old/Test-Exception-0.32/META.json 2013-04-28 02:02:17.000000000 +0200 +++ new/Test-Exception-0.36/META.json 2015-01-08 17:50:39.000000000 +0100 @@ -4,7 +4,7 @@ "Adrian Howard <adri...@quietstars.com>" ], "dynamic_config" : 1, - "generated_by" : "Module::Build version 0.38, CPAN::Meta::Converter version 2.112621", + "generated_by" : "Module::Build version 0.421", "license" : [ "perl_5" ], @@ -16,7 +16,7 @@ "prereqs" : { "configure" : { "requires" : { - "Module::Build" : "0.38" + "Module::Build" : "0.42" } }, "runtime" : { @@ -33,7 +33,7 @@ "provides" : { "Test::Exception" : { "file" : "lib/Test/Exception.pm", - "version" : "0.32" + "version" : "0.36" } }, "release_status" : "stable", @@ -42,5 +42,5 @@ "http://dev.perl.org/licenses/" ] }, - "version" : "0.32" + "version" : "0.36" } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Test-Exception-0.32/META.yml new/Test-Exception-0.36/META.yml --- old/Test-Exception-0.32/META.yml 2013-04-28 02:02:17.000000000 +0200 +++ new/Test-Exception-0.36/META.yml 2015-01-08 17:50:39.000000000 +0100 @@ -4,25 +4,25 @@ - 'Adrian Howard <adri...@quietstars.com>' build_requires: {} configure_requires: - Module::Build: 0.38 + Module::Build: '0.42' dynamic_config: 1 -generated_by: 'Module::Build version 0.38, CPAN::Meta::Converter version 2.112621' +generated_by: 'Module::Build version 0.421, CPAN::Meta::Converter version 2.142060' license: perl meta-spec: url: http://module-build.sourceforge.net/META-spec-v1.4.html - version: 1.4 + version: '1.4' name: Test-Exception provides: Test::Exception: file: lib/Test/Exception.pm - version: 0.32 + version: '0.36' requires: - Sub::Uplevel: 0.18 - Test::Builder: 0.7 - Test::Builder::Tester: 1.07 - Test::Harness: 2.03 - Test::More: 0.7 - Test::Simple: 0.7 + Sub::Uplevel: '0.18' + Test::Builder: '0.7' + Test::Builder::Tester: '1.07' + Test::Harness: '2.03' + Test::More: '0.7' + Test::Simple: '0.7' resources: license: http://dev.perl.org/licenses/ -version: 0.32 +version: '0.36' diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Test-Exception-0.32/Makefile.PL new/Test-Exception-0.36/Makefile.PL --- old/Test-Exception-0.32/Makefile.PL 2013-04-28 02:02:17.000000000 +0200 +++ new/Test-Exception-0.36/Makefile.PL 2015-01-08 17:50:39.000000000 +0100 @@ -1,4 +1,4 @@ -# Note: this file was auto-generated by Module::Build::Compat version 0.3800 +# Note: this file was auto-generated by Module::Build::Compat version 0.4210 use ExtUtils::MakeMaker; WriteMakefile ( diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Test-Exception-0.32/README new/Test-Exception-0.36/README --- old/Test-Exception-0.32/README 2013-04-28 02:02:17.000000000 +0200 +++ new/Test-Exception-0.36/README 2015-01-08 17:50:39.000000000 +0100 @@ -48,8 +48,8 @@ If you are not already familiar with Test::More now would be the time to go take a look. - You can specify the test plan when you `use Test::Exception' in the same - way as `use Test::More'. See Test::More for details. + You can specify the test plan when you "use Test::Exception" in the same + way as "use Test::More". See Test::More for details. NOTE: Test::Exception only checks for exceptions. It will ignore other methods of stopping program execution - including exit(). If you have an @@ -68,7 +68,7 @@ throws_ok { read_file( 'unreadable' ) } qr/No file/, 'no file'; - If your perl does not support `qr//' you can also pass a regex-like + If your perl does not support "qr//" you can also pass a regex-like string, for example: throws_ok { read_file( 'unreadable' ) } '/No file/', 'no file'; @@ -79,7 +79,7 @@ throws_ok { $foo->bar } "Error::Simple", 'simple error'; - Will only pass if the `bar' method throws an Error::Simple + Will only pass if the "bar" method throws an Error::Simple exception, or a subclass of an Error::Simple exception. You can get the same effect by passing an instance of the exception @@ -108,7 +108,7 @@ A description of the exception being checked is used if no optional test description is passed. - NOTE: Rememeber when you `die $string_without_a_trailing_newline' + NOTE: Rememeber when you "die $string_without_a_trailing_newline" perl will automatically add the current script line number, input line number and a newline. This will form part of the string that throws_ok regular expressions match against. @@ -185,7 +185,7 @@ is read_file('answer.txt'), "42\n", 'answer is 42'; - unless `read_file('answer.txt')' dies, in which case you get the + unless "read_file('answer.txt')" dies, in which case you get the same kind of error as lives_ok() not ok 1 - answer is 42 @@ -215,49 +215,49 @@ plan tests => 2; # ... tests that need Test::Exception ... - Note that we load Test::Exception in a `BEGIN' block ensuring that the + Note that we load Test::Exception in a "BEGIN" block ensuring that the subroutine prototypes are in place before the rest of the test script is compiled. BUGS There are some edge cases in Perl's exception handling where Test::Exception will miss exceptions thrown in DESTROY blocks. See the - RT bug http://rt.cpan.org/Ticket/Display.html?id=24678 for details, + RT bug <http://rt.cpan.org/Ticket/Display.html?id=24678> for details, along with the t/edge-cases.t in the distribution test suite. These will be addressed in a future Test::Exception release. If you find any more bugs please let me know by e-mail, or report the - problem with http://rt.cpan.org/. + problem with <http://rt.cpan.org/>. COMMUNITY perl-qa If you are interested in testing using Perl I recommend you visit - http://qa.perl.org/ and join the excellent perl-qa mailing list. See - http://lists.perl.org/showlist.cgi?name=perl-qa for details on how - to subscribe. + <http://qa.perl.org/> and join the excellent perl-qa mailing list. + See <http://lists.perl.org/showlist.cgi?name=perl-qa> for details on + how to subscribe. perlmonks You can find users of Test::Exception, including the module author, - on http://www.perlmonks.org/. Feel free to ask questions on + on <http://www.perlmonks.org/>. Feel free to ask questions on Test::Exception there. CPAN::Forum The CPAN Forum is a web forum for discussing Perl's CPAN modules. The Test::Exception forum can be found at - http://www.cpanforum.com/dist/Test-Exception. + <http://www.cpanforum.com/dist/Test-Exception>. AnnoCPAN AnnoCPAN is a web site that allows community annotations of Perl module documentation. The Test::Exception annotations can be found - at http://annocpan.org/~ADIE/Test-Exception/. + at <http://annocpan.org/~ADIE/Test-Exception/>. TO DO If you think this module should do something that it doesn't (or does something that it shouldn't) please let me know. You can see my current to do list at - http://adrianh.tadalist.com/lists/public/15421, with an RSS feed of - changes at http://adrianh.tadalist.com/lists/feed_public/15421. + <http://adrianh.tadalist.com/lists/public/15421>, with an RSS feed of + changes at <http://adrianh.tadalist.com/lists/feed_public/15421>. ACKNOWLEDGMENTS Thanks to chromatic and Michael G Schwern for the excellent @@ -279,7 +279,7 @@ useful. SEE ALSO - http://del.icio.us/tag/Test::Exception + <http://del.icio.us/tag/Test::Exception> Delicious links on Test::Exception. Test::Warn & Test::NoWarnings @@ -291,10 +291,10 @@ Test::Simple & Test::More Basic utilities for writing tests. - http://qa.perl.org/test-modules.html + <http://qa.perl.org/test-modules.html> Overview of some of the many testing modules available on CPAN. - http://del.icio.us/tag/perl+testing + <http://del.icio.us/tag/perl+testing> Delicious links on perl testing. LICENCE diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Test-Exception-0.32/lib/Test/Exception.pm new/Test-Exception-0.36/lib/Test/Exception.pm --- old/Test-Exception-0.32/lib/Test/Exception.pm 2013-04-28 02:02:17.000000000 +0200 +++ new/Test-Exception-0.36/lib/Test/Exception.pm 2015-01-08 17:50:39.000000000 +0100 @@ -6,7 +6,7 @@ use Sub::Uplevel qw( uplevel ); use base qw( Exporter ); -our $VERSION = '0.32'; +our $VERSION = '0.36'; our @EXPORT = qw(dies_ok lives_ok throws_ok lives_and); my $Tester = Test::Builder->new; @@ -332,9 +332,25 @@ =cut +my $is_stream = $INC{'Test/Stream.pm'}; +our $LIVES_AND_NAME; +if ($is_stream) { + Test::Stream->shared->munge(sub { + return unless defined $LIVES_AND_NAME; + my ($stream, $e) = @_; + return unless $e->isa('Test::Stream::Event::Ok'); + return if defined $e->name; + $e->set_name($LIVES_AND_NAME); + }); +} + sub lives_and (&;$) { my ( $test, $description ) = @_; - { + if ($is_stream) { + local $LIVES_AND_NAME = $description; + eval { $test->() } and return 1; + } + else { local $Test::Builder::Level = $Test::Builder::Level + 1; my $ok = \&Test::Builder::ok; no warnings; -- To unsubscribe, e-mail: opensuse-commit+unsubscr...@opensuse.org For additional commands, e-mail: opensuse-commit+h...@opensuse.org