Hello community, here is the log from the commit of package perl-Test-Strict for openSUSE:Factory checked in at 2018-01-09 14:50:23 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-Test-Strict (Old) and /work/SRC/openSUSE:Factory/.perl-Test-Strict.new (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-Test-Strict" Tue Jan 9 14:50:23 2018 rev:3 rq:554824 version:0.40 Changes: -------- --- /work/SRC/openSUSE:Factory/perl-Test-Strict/perl-Test-Strict.changes 2016-12-03 18:28:19.000000000 +0100 +++ /work/SRC/openSUSE:Factory/.perl-Test-Strict.new/perl-Test-Strict.changes 2018-01-09 14:51:03.289817256 +0100 @@ -1,0 +2,9 @@ +Thu Nov 30 07:04:35 UTC 2017 - [email protected] + +- updated to 0.40 + see /usr/share/doc/packages/perl-Test-Strict/Changes + + 0.40 2017-11-29 13:00:00 MANWAR + - Merged pull request #22, thanks @cpansprout. + +------------------------------------------------------------------- Old: ---- Test-Strict-0.39.tar.gz New: ---- Test-Strict-0.40.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-Test-Strict.spec ++++++ --- /var/tmp/diff_new_pack.Im5s4w/_old 2018-01-09 14:51:03.889789127 +0100 +++ /var/tmp/diff_new_pack.Im5s4w/_new 2018-01-09 14:51:03.893788940 +0100 @@ -1,7 +1,7 @@ # # spec file for package perl-Test-Strict # -# Copyright (c) 2016 SUSE LINUX GmbH, Nuernberg, Germany. +# Copyright (c) 2017 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,14 +17,14 @@ Name: perl-Test-Strict -Version: 0.39 +Version: 0.40 Release: 0 %define cpan_name Test-Strict Summary: Check syntax, presence of use strict; and test coverage License: Artistic-1.0 or GPL-1.0+ Group: Development/Libraries/Perl Url: http://search.cpan.org/dist/Test-Strict/ -Source0: http://www.cpan.org/authors/id/M/MA/MANWAR/%{cpan_name}-%{version}.tar.gz +Source0: https://cpan.metacpan.org/authors/id/M/MA/MANWAR/%{cpan_name}-%{version}.tar.gz Source1: cpanspec.yml BuildArch: noarch BuildRoot: %{_tmppath}/%{name}-%{version}-build @@ -71,6 +71,7 @@ %files -f %{name}.files %defattr(-,root,root,755) -%doc Changes LICENSE README +%doc Changes README +%license LICENSE %changelog ++++++ Test-Strict-0.39.tar.gz -> Test-Strict-0.40.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Test-Strict-0.39/Changes new/Test-Strict-0.40/Changes --- old/Test-Strict-0.39/Changes 2016-12-02 13:07:18.000000000 +0100 +++ new/Test-Strict-0.40/Changes 2017-11-29 14:01:07.000000000 +0100 @@ -1,5 +1,8 @@ Revision history for Test::Strict. +0.40 2017-11-29 13:00:00 MANWAR + - Merged pull request #22, thanks @cpansprout. + 0.39 2016-12-02 12:10:00 MANWAR - Merged pull request #21, thanks @arc. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Test-Strict-0.39/META.json new/Test-Strict-0.40/META.json --- old/Test-Strict-0.39/META.json 2016-12-02 13:07:39.000000000 +0100 +++ new/Test-Strict-0.40/META.json 2017-11-29 14:02:01.000000000 +0100 @@ -4,7 +4,7 @@ "Pierre Denis <[email protected]>" ], "dynamic_config" : 1, - "generated_by" : "ExtUtils::MakeMaker version 7.18, CPAN::Meta::Converter version 2.150005", + "generated_by" : "ExtUtils::MakeMaker version 7.24, CPAN::Meta::Converter version 2.150005", "license" : [ "perl_5" ], @@ -65,12 +65,12 @@ "x_license" : "http://dev.perl.org/licenses/"; } }, - "version" : "0.39", + "version" : "0.40", "x_contributors" : [ "Gabor Szabo <[email protected]>", "Peter Vereshagin <[email protected]>", "Graham Knop <[email protected]>", "Mohammad S Anwar <[email protected]>" ], - "x_serialization_backend" : "JSON::PP version 2.27300" + "x_serialization_backend" : "JSON::PP version 2.27400" } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Test-Strict-0.39/META.yml new/Test-Strict-0.40/META.yml --- old/Test-Strict-0.39/META.yml 2016-12-02 13:07:39.000000000 +0100 +++ new/Test-Strict-0.40/META.yml 2017-11-29 14:02:01.000000000 +0100 @@ -9,7 +9,7 @@ configure_requires: ExtUtils::MakeMaker: '6.64' dynamic_config: 1 -generated_by: 'ExtUtils::MakeMaker version 7.18, CPAN::Meta::Converter version 2.150005' +generated_by: 'ExtUtils::MakeMaker version 7.24, CPAN::Meta::Converter version 2.150005' license: perl meta-spec: url: http://module-build.sourceforge.net/META-spec-v1.4.html @@ -34,7 +34,7 @@ resources: bugtracker: http://github.com/manwar/Test-Strict repository: http://github.com/manwar/Test-Strict.git -version: '0.39' +version: '0.40' x_contributors: - 'Gabor Szabo <[email protected]>' - 'Peter Vereshagin <[email protected]>' diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Test-Strict-0.39/lib/Test/Strict.pm new/Test-Strict-0.40/lib/Test/Strict.pm --- old/Test-Strict-0.39/lib/Test/Strict.pm 2016-12-01 16:04:42.000000000 +0100 +++ new/Test-Strict-0.40/lib/Test/Strict.pm 2017-11-29 13:59:47.000000000 +0100 @@ -6,7 +6,7 @@ =head1 VERSION -Version 0.39 +Version 0.40 =head1 SYNOPSIS @@ -71,7 +71,7 @@ use Config; our $COVER; -our $VERSION = '0.39'; +our $VERSION = '0.40'; our $PERL = $^X || 'perl'; our $COVERAGE_THRESHOLD = 50; # 50% our $UNTAINT_PATTERN = qr|^(.*)$|; @@ -180,8 +180,8 @@ my $is_script = _is_perl_script($file); # Set the environment to compile the script or module - my $inc = join(' -I ', map{ qq{"$_"} } @INC ) || ''; - $inc = "-I $inc" if $inc; + require Config; + my $inc = join($Config::Config{path_sep}, @INC) || ''; $file = _untaint($file); my $perl_bin = _untaint($PERL); local $ENV{PATH} = _untaint($ENV{PATH}) if $ENV{PATH}; @@ -191,7 +191,10 @@ $switch = _taint_switch($file) || '' if $is_script; # Compile and check for errors - my $eval = `$perl_bin $inc -c$switch \"$file\" 2>&1`; + my $eval = do { + local $ENV{PERL5LIB} = $inc; + `$perl_bin -c$switch \"$file\" 2>&1`; + }; $file = quotemeta($file); my $ok = $eval =~ qr!$file syntax OK!ms; $Test->ok($ok, $test_txt); diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Test-Strict-0.39/t/02fail.t new/Test-Strict-0.40/t/02fail.t --- old/Test-Strict-0.39/t/02fail.t 2016-06-08 13:16:07.000000000 +0200 +++ new/Test-Strict-0.40/t/02fail.t 2017-11-29 13:58:46.000000000 +0100 @@ -22,8 +22,8 @@ use File::Temp qw( tempdir tempfile ); my $perl = $^X || 'perl'; -my $inc = join(' -I ', @INC) || ''; -$inc = "-I $inc" if $inc; +require Config; +my $inc = join($Config::Config{path_sep}, @INC) || ''; require Test::Strict; @@ -50,7 +50,8 @@ my $dir = make_bad_file(); my ($fh, $outfile) = tempfile( UNLINK => 1 ); - ok( `$perl $inc -MTest::Strict -e "all_perl_files_ok( '$dir' )" 2>&1 > $outfile`, 'all_perl_files_ok' ); + local $ENV{PERL5LIB} = $inc; + ok( `$perl -MTest::Strict -e "all_perl_files_ok( '$dir' )" 2>&1 > $outfile`, 'all_perl_files_ok' ); local $/ = undef; my $content = <$fh>; like( $content, qr/^ok 1 - Syntax check /m, "Syntax ok" ); @@ -60,7 +61,8 @@ sub test2 { my $dir = make_another_bad_file(); my ($fh, $outfile) = tempfile( UNLINK => 1 ); - ok( `$perl $inc -MTest::Strict -e "all_perl_files_ok( '$dir' )" 2>&1 > $outfile` ); + local $ENV{PERL5LIB} = $inc; + ok( `$perl -MTest::Strict -e "all_perl_files_ok( '$dir' )" 2>&1 > $outfile` ); local $/ = undef; my $content = <$fh>; like( $content, qr/not ok 1 \- Syntax check /, "Syntax error" ); @@ -70,7 +72,8 @@ sub test3 { my $file = make_bad_warning(); my ($fh, $outfile) = tempfile( UNLINK => 1 ); - ok( `$perl $inc -e "use Test::Strict no_plan =>1; warnings_ok( '$file' )" 2>&1 > $outfile` ); + local $ENV{PERL5LIB} = $inc; + ok( `$perl -e "use Test::Strict no_plan =>1; warnings_ok( '$file' )" 2>&1 > $outfile` ); local $/ = undef; my $content = <$fh>; like( $content, qr/not ok 1 \- use warnings /, "Does not have use warnings" ); @@ -79,7 +82,8 @@ sub test4 { my $test_file = make_warning_files(); my ($fh, $outfile) = tempfile( UNLINK => 1 ); - ok( `$perl $inc $test_file 2>&1 > $outfile` ); + local $ENV{PERL5LIB} = $inc; + ok( `$perl $test_file 2>&1 > $outfile` ); local $/ = undef; my $content = <$fh>; like( $content, qr/not ok \d+ \- use warnings/, "Does not have use warnings" ); @@ -92,7 +96,8 @@ skip 'Moose::Autobox is needed for this test', 3 if $err; my $dir = make_moose_bad_file(); my ($fh, $outfile) = tempfile( UNLINK => 1 ); - ok( `$perl $inc -MTest::Strict -e "all_perl_files_ok( '$dir' )" 2>&1 > $outfile` ); + local $ENV{PERL5LIB} = $inc; + ok( `$perl -MTest::Strict -e "all_perl_files_ok( '$dir' )" 2>&1 > $outfile` ); local $/ = undef; my $content = <$fh>; like( $content, qr/^ok 1 - Syntax check /m, "Syntax ok" );
