Hello community, here is the log from the commit of package perl-File-Which for openSUSE:Factory checked in at 2017-09-15 21:01:55 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-File-Which (Old) and /work/SRC/openSUSE:Factory/.perl-File-Which.new (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-File-Which" Fri Sep 15 21:01:55 2017 rev:27 rq:522991 version:1.22 Changes: -------- --- /work/SRC/openSUSE:Factory/perl-File-Which/perl-File-Which.changes 2016-06-03 16:37:07.000000000 +0200 +++ /work/SRC/openSUSE:Factory/.perl-File-Which.new/perl-File-Which.changes 2017-09-15 21:01:56.466583450 +0200 @@ -1,0 +2,9 @@ +Sat Sep 9 05:34:17 UTC 2017 - [email protected] + +- updated to 1.22 + see /usr/share/doc/packages/perl-File-Which/Changes + + 1.22 2017-09-08 14:08:59 -0400 + - Support for MSYS2 ($^O eq 'msys') + +------------------------------------------------------------------- Old: ---- File-Which-1.21.tar.gz New: ---- File-Which-1.22.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-File-Which.spec ++++++ --- /var/tmp/diff_new_pack.5V2Gop/_old 2017-09-15 21:01:57.598424573 +0200 +++ /var/tmp/diff_new_pack.5V2Gop/_new 2017-09-15 21:01:57.602424011 +0200 @@ -1,7 +1,7 @@ # # spec file for package perl-File-Which # -# 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-File-Which -Version: 1.21 +Version: 1.22 Release: 0 %define cpan_name File-Which Summary: Perl implementation of the which utility as an API License: Artistic-1.0 or GPL-1.0+ Group: Development/Libraries/Perl Url: http://search.cpan.org/dist/File-Which/ -Source0: http://www.cpan.org/authors/id/P/PL/PLICEASE/%{cpan_name}-%{version}.tar.gz +Source0: https://cpan.metacpan.org/authors/id/P/PL/PLICEASE/%{cpan_name}-%{version}.tar.gz Source1: cpanspec.yml BuildArch: noarch BuildRoot: %{_tmppath}/%{name}-%{version}-build @@ -72,6 +72,7 @@ %files -f %{name}.files %defattr(-,root,root,755) -%doc Changes LICENSE README +%doc author.yml Changes README +%license LICENSE %changelog ++++++ File-Which-1.21.tar.gz -> File-Which-1.22.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/File-Which-1.21/Changes new/File-Which-1.22/Changes --- old/File-Which-1.21/Changes 2016-03-02 20:20:45.000000000 +0100 +++ new/File-Which-1.22/Changes 2017-09-08 20:09:02.000000000 +0200 @@ -1,5 +1,8 @@ Revision history for File-Which +1.22 2017-09-08 14:08:59 -0400 + - Support for MSYS2 ($^O eq 'msys') + 1.21 2016-03-02 14:20:43 -0500 - Workaround for nutty cygwin filesystem rules diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/File-Which-1.21/INSTALL new/File-Which-1.22/INSTALL --- old/File-Which-1.21/INSTALL 2016-03-02 20:20:45.000000000 +0100 +++ new/File-Which-1.22/INSTALL 2017-09-08 20:09:02.000000000 +0200 @@ -8,10 +8,10 @@ % cpanm File::Which -If you are installing into a system-wide directory, you may need to pass the -"-S" flag to cpanm, which uses sudo to install the module: - - % cpanm -S File::Which +If it does not have permission to install modules to the current perl, cpanm +will automatically set up and install to a local::lib in your home directory. +See the local::lib documentation (https://metacpan.org/pod/local::lib) for +details on enabling it in your environment. ## Installing with the CPAN shell @@ -31,9 +31,9 @@ % make install -If you are installing into a system-wide directory, you may need to run: - - % sudo make install +If your perl is system-managed, you can create a local::lib in your home +directory to install modules to. For details, see the local::lib documentation: +https://metacpan.org/pod/local::lib ## Documentation diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/File-Which-1.21/MANIFEST new/File-Which-1.22/MANIFEST --- old/File-Which-1.21/MANIFEST 2016-03-02 20:20:45.000000000 +0100 +++ new/File-Which-1.22/MANIFEST 2017-09-08 20:09:02.000000000 +0200 @@ -1,4 +1,4 @@ -# This file was automatically generated by Dist::Zilla::Plugin::Manifest v5.043. +# This file was automatically generated by Dist::Zilla::Plugin::Manifest v6.010. Changes INSTALL LICENSE @@ -7,6 +7,7 @@ META.yml Makefile.PL README +author.yml corpus/test-bin-unix/0 corpus/test-bin-unix/README.txt corpus/test-bin-unix/all @@ -17,7 +18,6 @@ corpus/test-bin-win/all.exe corpus/test-bin-win/test1.exe corpus/test-bin-win/test2.bat -cpanfile dist.ini lib/File/Which.pm t/00_diag.t @@ -25,13 +25,12 @@ t/02_all.t t/03_simple.t t/04_pwhich.t -xt/release/eol.t +xt/author/eol.t +xt/author/no_tabs.t +xt/author/pod.t +xt/author/pod_coverage.t +xt/author/pod_spelling_common.t +xt/author/pod_spelling_system.t +xt/author/strict.t +xt/author/version.t xt/release/fixme.t -xt/release/no_tabs.t -xt/release/pod.t -xt/release/pod_coverage.t -xt/release/pod_spelling_common.t -xt/release/pod_spelling_system.t -xt/release/release.yml -xt/release/strict.t -xt/release/version.t diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/File-Which-1.21/META.json new/File-Which-1.22/META.json --- old/File-Which-1.21/META.json 2016-03-02 20:20:45.000000000 +0100 +++ new/File-Which-1.22/META.json 2017-09-08 20:09:02.000000000 +0200 @@ -6,7 +6,7 @@ "Graham Ollis <[email protected]>" ], "dynamic_config" : 0, - "generated_by" : "Dist::Zilla version 5.043, CPAN::Meta::Converter version 2.150005", + "generated_by" : "Dist::Zilla version 6.010, CPAN::Meta::Converter version 2.150010", "license" : [ "perl_5" ], @@ -23,9 +23,6 @@ } }, "develop" : { - "recommends" : { - "YAML::XS" : "0" - }, "requires" : { "FindBin" : "0", "Test::EOL" : "0", @@ -57,13 +54,14 @@ "bugtracker" : { "web" : "https://github.com/plicease/File-Which/issues"; }, - "homepage" : "http://perl.wdlabs.com/File-Which";, + "homepage" : "https://metacpan.org/pod/File::Which";, "repository" : { "type" : "git", "url" : "git://github.com/plicease/File-Which.git", "web" : "https://github.com/plicease/File-Which"; } }, - "version" : "1.21" + "version" : "1.22", + "x_serialization_backend" : "Cpanel::JSON::XS version 3.0233" } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/File-Which-1.21/META.yml new/File-Which-1.22/META.yml --- old/File-Which-1.21/META.yml 2016-03-02 20:20:45.000000000 +0100 +++ new/File-Which-1.22/META.yml 2017-09-08 20:09:02.000000000 +0200 @@ -11,7 +11,7 @@ ExtUtils::MakeMaker: '0' perl: '5.006' dynamic_config: 0 -generated_by: 'Dist::Zilla version 5.043, CPAN::Meta::Converter version 2.150005' +generated_by: 'Dist::Zilla version 6.010, CPAN::Meta::Converter version 2.150010' license: perl meta-spec: url: http://module-build.sourceforge.net/META-spec-v1.4.html @@ -21,6 +21,7 @@ perl: '5.006' resources: bugtracker: https://github.com/plicease/File-Which/issues - homepage: http://perl.wdlabs.com/File-Which + homepage: https://metacpan.org/pod/File::Which repository: git://github.com/plicease/File-Which.git -version: '1.21' +version: '1.22' +x_serialization_backend: 'YAML::Tiny version 1.70' diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/File-Which-1.21/Makefile.PL new/File-Which-1.22/Makefile.PL --- old/File-Which-1.21/Makefile.PL 2016-03-02 20:20:45.000000000 +0100 +++ new/File-Which-1.22/Makefile.PL 2017-09-08 20:09:02.000000000 +0200 @@ -5,7 +5,7 @@ exit; } } -# This file was automatically generated by Dist::Zilla::Plugin::MakeMaker v5.043. +# This file was automatically generated by Dist::Zilla::Plugin::MakeMaker v6.010. use strict; use warnings; @@ -27,7 +27,7 @@ "TEST_REQUIRES" => { "Test::More" => "0.47" }, - "VERSION" => "1.21", + "VERSION" => "1.22", "test" => { "TESTS" => "t/*.t" } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/File-Which-1.21/README new/File-Which-1.22/README --- old/File-Which-1.21/README 2016-03-02 20:20:45.000000000 +0100 +++ new/File-Which-1.22/README 2017-09-08 20:09:02.000000000 +0200 @@ -4,7 +4,7 @@ VERSION - version 1.21 + version 1.22 SYNOPSIS diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/File-Which-1.21/author.yml new/File-Which-1.22/author.yml --- old/File-Which-1.21/author.yml 1970-01-01 01:00:00.000000000 +0100 +++ new/File-Which-1.22/author.yml 2017-09-08 20:09:02.000000000 +0200 @@ -0,0 +1,22 @@ +--- +pod_spelling_system: + skip: 0 + # list of words that are spelled correctly + # (regardless of what spell check thinks) + stopwords: + - 9x + - Bekman + - DocSet + - Einar + - Ellefsen + - OS2 + - Stas + - Win32 + - XP + +pod_coverage: + skip: 0 + # format is "Class#method" or "Class", regex allowed + # for either Class or method. + private: [] + diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/File-Which-1.21/cpanfile new/File-Which-1.22/cpanfile --- old/File-Which-1.21/cpanfile 2016-03-02 20:20:45.000000000 +0100 +++ new/File-Which-1.22/cpanfile 1970-01-01 01:00:00.000000000 +0100 @@ -1,29 +0,0 @@ -requires "perl" => "5.006"; - -on 'test' => sub { - requires "Test::More" => "0.47"; - requires "perl" => "5.006"; -}; - -on 'configure' => sub { - requires "ExtUtils::MakeMaker" => "0"; - requires "perl" => "5.006"; -}; - -on 'develop' => sub { - requires "FindBin" => "0"; - requires "Test::EOL" => "0"; - requires "Test::Fixme" => "0.07"; - requires "Test::More" => "0.47"; - requires "Test::NoTabs" => "0"; - requires "Test::Pod" => "0"; - requires "Test::Pod::Coverage" => "0"; - requires "Test::Pod::Spelling::CommonMistakes" => "0"; - requires "Test::Spelling" => "0"; - requires "Test::Strict" => "0"; - requires "YAML" => "0"; -}; - -on 'develop' => sub { - recommends "YAML::XS" => "0"; -}; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/File-Which-1.21/dist.ini new/File-Which-1.22/dist.ini --- old/File-Which-1.21/dist.ini 2016-03-02 20:20:45.000000000 +0100 +++ new/File-Which-1.22/dist.ini 2017-09-08 20:09:02.000000000 +0200 @@ -5,7 +5,7 @@ license = Perl_5 copyright_holder = Per Einar Ellefsen <[email protected]> copyright_year = 2002 -version = 1.21 +version = 1.22 [@Author::Plicease] :version = 2.00 @@ -31,3 +31,5 @@ [OnlyCorePrereqs] starting_version = 5.006002 +[PruneFiles] +filename = xt/release/changes.t diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/File-Which-1.21/lib/File/Which.pm new/File-Which-1.22/lib/File/Which.pm --- old/File-Which-1.21/lib/File/Which.pm 2016-03-02 20:20:45.000000000 +0100 +++ new/File-Which-1.22/lib/File/Which.pm 2017-09-08 20:09:02.000000000 +0200 @@ -6,7 +6,7 @@ use File::Spec (); # ABSTRACT: Perl implementation of the which utility as an API -our $VERSION = '1.21'; # VERSION +our $VERSION = '1.22'; # VERSION our @ISA = 'Exporter'; @@ -16,7 +16,7 @@ use constant IS_VMS => ($^O eq 'VMS'); use constant IS_MAC => ($^O eq 'MacOS'); use constant IS_DOS => ($^O eq 'MSWin32' or $^O eq 'dos' or $^O eq 'os2'); -use constant IS_CYG => ($^O eq 'cygwin'); +use constant IS_CYG => ($^O eq 'cygwin' || $^O eq 'msys'); # For Win32 systems, stores the extensions used for # executable files @@ -146,7 +146,7 @@ =head1 VERSION -version 1.21 +version 1.22 =head1 SYNOPSIS diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/File-Which-1.21/t/02_all.t new/File-Which-1.22/t/02_all.t --- old/File-Which-1.21/t/02_all.t 2016-03-02 20:20:45.000000000 +0100 +++ new/File-Which-1.22/t/02_all.t 2017-09-08 20:09:02.000000000 +0200 @@ -11,7 +11,7 @@ # Set up for running the test application @PATH = ($test_bin); -push @PATH, File::Spec->catdir( 'corpus', 'test-bin-win' ) if $^O eq 'cygwin'; +push @PATH, File::Spec->catdir( 'corpus', 'test-bin-win' ) if $^O =~ /^(cygwin|msys)$/; unless ( File::Which::IS_VMS or diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/File-Which-1.21/xt/author/eol.t new/File-Which-1.22/xt/author/eol.t --- old/File-Which-1.21/xt/author/eol.t 1970-01-01 01:00:00.000000000 +0100 +++ new/File-Which-1.22/xt/author/eol.t 2017-09-08 20:09:02.000000000 +0200 @@ -0,0 +1,16 @@ +use strict; +use warnings; +use Test::More; +BEGIN { + plan skip_all => 'test requires Test::EOL' + unless eval q{ use Test::EOL; 1 }; +}; +use Test::EOL; +use FindBin; +use File::Spec; + +chdir(File::Spec->catdir($FindBin::Bin, File::Spec->updir, File::Spec->updir)); + +all_perl_files_ok(grep { -e $_ } qw( bin lib t Makefile.PL )); + + diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/File-Which-1.21/xt/author/no_tabs.t new/File-Which-1.22/xt/author/no_tabs.t --- old/File-Which-1.21/xt/author/no_tabs.t 1970-01-01 01:00:00.000000000 +0100 +++ new/File-Which-1.22/xt/author/no_tabs.t 2017-09-08 20:09:02.000000000 +0200 @@ -0,0 +1,16 @@ +use strict; +use warnings; +use Test::More; +BEGIN { + plan skip_all => 'test requires Test::NoTabs' + unless eval q{ use Test::NoTabs; 1 }; +}; +use Test::NoTabs; +use FindBin; +use File::Spec; + +chdir(File::Spec->catdir($FindBin::Bin, File::Spec->updir, File::Spec->updir)); + +all_perl_files_ok( grep { -e $_ } qw( bin lib t Makefile.PL )); + + diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/File-Which-1.21/xt/author/pod.t new/File-Which-1.22/xt/author/pod.t --- old/File-Which-1.21/xt/author/pod.t 1970-01-01 01:00:00.000000000 +0100 +++ new/File-Which-1.22/xt/author/pod.t 2017-09-08 20:09:02.000000000 +0200 @@ -0,0 +1,16 @@ +use strict; +use warnings; +use Test::More; +BEGIN { + plan skip_all => 'test requires Test::Pod' + unless eval q{ use Test::Pod; 1 }; +}; +use Test::Pod; +use FindBin; +use File::Spec; + +chdir(File::Spec->catdir($FindBin::Bin, File::Spec->updir, File::Spec->updir)); + +all_pod_files_ok( grep { -e $_ } qw( bin lib )); + + diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/File-Which-1.21/xt/author/pod_coverage.t new/File-Which-1.22/xt/author/pod_coverage.t --- old/File-Which-1.21/xt/author/pod_coverage.t 1970-01-01 01:00:00.000000000 +0100 +++ new/File-Which-1.22/xt/author/pod_coverage.t 2017-09-08 20:09:02.000000000 +0200 @@ -0,0 +1,75 @@ +use strict; +use warnings; +use Test::More; +BEGIN { + plan skip_all => 'test requires 5.010 or better' + unless $] >= 5.010; + plan skip_all => 'test requires Test::Pod::Coverage' + unless eval q{ use Test::Pod::Coverage; 1 }; + plan skip_all => 'test requires YAML' + unless eval q{ use YAML; 1; }; +}; +use Test::Pod::Coverage; +use YAML qw( LoadFile ); +use FindBin; +use File::Spec; + +my $config_filename = File::Spec->catfile( + $FindBin::Bin, File::Spec->updir, File::Spec->updir, 'author.yml' +); + +my $config; +$config = LoadFile($config_filename) + if -r $config_filename; + +plan skip_all => 'disabled' if $config->{pod_coverage}->{skip}; + +chdir(File::Spec->catdir($FindBin::Bin, File::Spec->updir, File::Spec->updir)); + +my @private_classes; +my %private_methods; + +push @{ $config->{pod_coverage}->{private} }, + 'Alien::.*::Install::Files#Inline'; + +foreach my $private (@{ $config->{pod_coverage}->{private} }) +{ + my($class,$method) = split /#/, $private; + if(defined $class && $class ne '') + { + my $regex = eval 'qr{^' . $class . '$}'; + if(defined $method && $method ne '') + { + push @private_classes, { regex => $regex, method => $method }; + } + else + { + push @private_classes, { regex => $regex, all => 1 }; + } + } + elsif(defined $method && $method ne '') + { + $private_methods{$_} = 1 for split /,/, $method; + } +} + +my @classes = all_modules; + +plan tests => scalar @classes; + +foreach my $class (@classes) +{ + SKIP: { + my($is_private_class) = map { 1 } grep { $class =~ $_->{regex} && $_->{all} } @private_classes; + skip "private class: $class", 1 if $is_private_class; + + my %methods = map {; $_ => 1 } map { split /,/, $_->{method} } grep { $class =~ $_->{regex} } @private_classes; + $methods{$_} = 1 for keys %private_methods; + + my $also_private = eval 'qr{^' . join('|', keys %methods ) . '$}'; + + pod_coverage_ok $class, { also_private => [$also_private] }; + }; +} + + diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/File-Which-1.21/xt/author/pod_spelling_common.t new/File-Which-1.22/xt/author/pod_spelling_common.t --- old/File-Which-1.21/xt/author/pod_spelling_common.t 1970-01-01 01:00:00.000000000 +0100 +++ new/File-Which-1.22/xt/author/pod_spelling_common.t 2017-09-08 20:09:02.000000000 +0200 @@ -0,0 +1,29 @@ +use strict; +use warnings; +use Test::More; +BEGIN { + plan skip_all => 'test requires Test::Pod::Spelling::CommonMistakes' + unless eval q{ use Test::Pod::Spelling::CommonMistakes; 1 }; + plan skip_all => 'test requires YAML' + unless eval q{ use YAML qw( LoadFile ); 1 }; +}; +use Test::Pod::Spelling::CommonMistakes; +use FindBin; +use File::Spec; + +my $config_filename = File::Spec->catfile( + $FindBin::Bin, File::Spec->updir, File::Spec->updir, 'author.yml' +); + +my $config; +$config = LoadFile($config_filename) + if -r $config_filename; + +plan skip_all => 'disabled' if $config->{pod_spelling_common}->{skip}; + +chdir(File::Spec->catdir($FindBin::Bin, File::Spec->updir, File::Spec->updir)); + +# TODO: test files in bin too. +all_pod_files_ok; + + diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/File-Which-1.21/xt/author/pod_spelling_system.t new/File-Which-1.22/xt/author/pod_spelling_system.t --- old/File-Which-1.21/xt/author/pod_spelling_system.t 1970-01-01 01:00:00.000000000 +0100 +++ new/File-Which-1.22/xt/author/pod_spelling_system.t 2017-09-08 20:09:02.000000000 +0200 @@ -0,0 +1,102 @@ +use strict; +use warnings; +use Test::More; +BEGIN { + plan skip_all => 'test requires Test::Spelling' + unless eval q{ use Test::Spelling; 1 }; + plan skip_all => 'test requires YAML' + unless eval q{ use YAML; 1; }; +}; +use Test::Spelling; +use YAML qw( LoadFile ); +use FindBin; +use File::Spec; + +my $config_filename = File::Spec->catfile( + $FindBin::Bin, File::Spec->updir, File::Spec->updir, 'author.yml' +); + +my $config; +$config = LoadFile($config_filename) + if -r $config_filename; + +plan skip_all => 'disabled' if $config->{pod_spelling_system}->{skip}; + +chdir(File::Spec->catdir($FindBin::Bin, File::Spec->updir, File::Spec->updir)); + +add_stopwords(@{ $config->{pod_spelling_system}->{stopwords} }); +add_stopwords(qw( +Plicease +stdout +stderr +stdin +subref +loopback +username +os +Ollis +Mojolicious +plicease +CPAN +reinstall +TODO +filename +filenames +login +callback +callbacks +standalone +VMS +hostname +hostnames +TCP +UDP +IP +API +MSWin32 +OpenBSD +FreeBSD +NetBSD +unencrypted +WebSocket +WebSockets +timestamp +timestamps +poney +BackPAN +portably +RedHat +AIX +BSD +XS +FFI +perlish +optimizations +subdirectory +RESTful +SQLite +JavaScript +dir +plugins +munge +jQuery +namespace +PDF +PDFs +usernames +DBI +pluggable +APIs +SSL +JSON +YAML +uncommented +Solaris +OpenVMS +URI +URL +CGI +)); +all_pod_files_spelling_ok; + + diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/File-Which-1.21/xt/author/strict.t new/File-Which-1.22/xt/author/strict.t --- old/File-Which-1.21/xt/author/strict.t 1970-01-01 01:00:00.000000000 +0100 +++ new/File-Which-1.22/xt/author/strict.t 2017-09-08 20:09:02.000000000 +0200 @@ -0,0 +1,23 @@ +use strict; +use warnings; +use Test::More; +BEGIN { + plan skip_all => 'test requires Test::Strict' + unless eval q{ use Test::Strict; 1 }; +}; +use Test::Strict; +use FindBin; +use File::Spec; + +chdir(File::Spec->catdir($FindBin::Bin, File::Spec->updir, File::Spec->updir)); + +unshift @Test::Strict::MODULES_ENABLING_STRICT, + 'ozo', + 'Test2::Bundle::SIPS', + 'Test2::V0', + 'Test2::Bundle::Extended'; +note "enabling strict = $_" for @Test::Strict::MODULES_ENABLING_STRICT; + +all_perl_files_ok( grep { -e $_ } qw( bin lib t Makefile.PL )); + + diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/File-Which-1.21/xt/author/version.t new/File-Which-1.22/xt/author/version.t --- old/File-Which-1.21/xt/author/version.t 1970-01-01 01:00:00.000000000 +0100 +++ new/File-Which-1.22/xt/author/version.t 2017-09-08 20:09:02.000000000 +0200 @@ -0,0 +1,45 @@ +use strict; +use warnings; +use Test::More; +use FindBin (); +BEGIN { + + plan skip_all => "test requires Test::Version 2.00" + unless eval q{ + use Test::Version 2.00 qw( version_all_ok ), { + has_version => 1, + filename_match => sub { $_[0] !~ m{/(ConfigData|Install/Files)\.pm$} }, + }; + 1 + }; + + plan skip_all => "test requires Path::Class" + unless eval q{ use Path::Class qw( file dir ); 1 }; + plan skip_all => 'test requires YAML' + unless eval q{ use YAML; 1; }; +} + +use YAML qw( LoadFile ); +use FindBin; +use File::Spec; + +plan skip_all => "test not built yet (run dzil test)" + unless -e dir( $FindBin::Bin)->parent->parent->file('Makefile.PL') + || -e dir( $FindBin::Bin)->parent->parent->file('Build.PL'); + +my $config_filename = File::Spec->catfile( + $FindBin::Bin, File::Spec->updir, File::Spec->updir, 'author.yml' +); + +my $config; +$config = LoadFile($config_filename) + if -r $config_filename; + +if($config->{version}->{dir}) +{ + note "using dir " . $config->{version}->{dir} +} + +version_all_ok($config->{version}->{dir} ? ($config->{version}->{dir}) : ()); +done_testing; + diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/File-Which-1.21/xt/release/eol.t new/File-Which-1.22/xt/release/eol.t --- old/File-Which-1.21/xt/release/eol.t 2016-03-02 20:20:45.000000000 +0100 +++ new/File-Which-1.22/xt/release/eol.t 1970-01-01 01:00:00.000000000 +0100 @@ -1,14 +0,0 @@ -use strict; -use warnings; -use Test::More; -BEGIN { - plan skip_all => 'test requires Test::EOL' - unless eval q{ use Test::EOL; 1 }; -}; -use Test::EOL; -use FindBin; -use File::Spec; - -chdir(File::Spec->catdir($FindBin::Bin, File::Spec->updir, File::Spec->updir)); - -all_perl_files_ok(grep { -e $_ } qw( bin lib t Makefile.PL )); diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/File-Which-1.21/xt/release/fixme.t new/File-Which-1.22/xt/release/fixme.t --- old/File-Which-1.21/xt/release/fixme.t 2016-03-02 20:20:45.000000000 +0100 +++ new/File-Which-1.22/xt/release/fixme.t 2017-09-08 20:09:02.000000000 +0200 @@ -13,7 +13,8 @@ run_tests( match => qr/FIXME/, - where => [ grep { -e $_ } qw( bin lib t Makefile.PL )], + where => [ grep { -e $_ } qw( bin lib t Makefile.PL Build.PL )], warn => 1, ); + diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/File-Which-1.21/xt/release/no_tabs.t new/File-Which-1.22/xt/release/no_tabs.t --- old/File-Which-1.21/xt/release/no_tabs.t 2016-03-02 20:20:45.000000000 +0100 +++ new/File-Which-1.22/xt/release/no_tabs.t 1970-01-01 01:00:00.000000000 +0100 @@ -1,15 +0,0 @@ -use strict; -use warnings; -use Test::More; -BEGIN { - plan skip_all => 'test requires Test::NoTabs' - unless eval q{ use Test::NoTabs; 1 }; -}; -use Test::NoTabs; -use FindBin; -use File::Spec; - -chdir(File::Spec->catdir($FindBin::Bin, File::Spec->updir, File::Spec->updir)); - -all_perl_files_ok( grep { -e $_ } qw( bin lib t Makefile.PL )); - diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/File-Which-1.21/xt/release/pod.t new/File-Which-1.22/xt/release/pod.t --- old/File-Which-1.21/xt/release/pod.t 2016-03-02 20:20:45.000000000 +0100 +++ new/File-Which-1.22/xt/release/pod.t 1970-01-01 01:00:00.000000000 +0100 @@ -1,15 +0,0 @@ -use strict; -use warnings; -use Test::More; -BEGIN { - plan skip_all => 'test requires Test::Pod' - unless eval q{ use Test::Pod; 1 }; -}; -use Test::Pod; -use FindBin; -use File::Spec; - -chdir(File::Spec->catdir($FindBin::Bin, File::Spec->updir, File::Spec->updir)); - -all_pod_files_ok( grep { -e $_ } qw( bin lib )); - diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/File-Which-1.21/xt/release/pod_coverage.t new/File-Which-1.22/xt/release/pod_coverage.t --- old/File-Which-1.21/xt/release/pod_coverage.t 2016-03-02 20:20:45.000000000 +0100 +++ new/File-Which-1.22/xt/release/pod_coverage.t 1970-01-01 01:00:00.000000000 +0100 @@ -1,74 +0,0 @@ -use strict; -use warnings; -use Test::More; -BEGIN { - plan skip_all => 'test requires 5.010 or better' - unless $] >= 5.010; - plan skip_all => 'test requires Test::Pod::Coverage' - unless eval q{ use Test::Pod::Coverage; 1 }; - plan skip_all => 'test requires YAML' - unless eval q{ use YAML; 1; }; -}; -use Test::Pod::Coverage; -use YAML qw( LoadFile ); -use FindBin; -use File::Spec; - -my $config_filename = File::Spec->catfile( - $FindBin::Bin, 'release.yml' -); - -my $config; -$config = LoadFile($config_filename) - if -r $config_filename; - -plan skip_all => 'disabled' if $config->{pod_coverage}->{skip}; - -chdir(File::Spec->catdir($FindBin::Bin, File::Spec->updir, File::Spec->updir)); - -my @private_classes; -my %private_methods; - -push @{ $config->{pod_coverage}->{private} }, - 'Alien::.*::Install::Files#Inline'; - -foreach my $private (@{ $config->{pod_coverage}->{private} }) -{ - my($class,$method) = split /#/, $private; - if(defined $class && $class ne '') - { - my $regex = eval 'qr{^' . $class . '$}'; - if(defined $method && $method ne '') - { - push @private_classes, { regex => $regex, method => $method }; - } - else - { - push @private_classes, { regex => $regex, all => 1 }; - } - } - elsif(defined $method && $method ne '') - { - $private_methods{$_} = 1 for split /,/, $method; - } -} - -my @classes = all_modules; - -plan tests => scalar @classes; - -foreach my $class (@classes) -{ - SKIP: { - my($is_private_class) = map { 1 } grep { $class =~ $_->{regex} && $_->{all} } @private_classes; - skip "private class: $class", 1 if $is_private_class; - - my %methods = map {; $_ => 1 } map { split /,/, $_->{method} } grep { $class =~ $_->{regex} } @private_classes; - $methods{$_} = 1 for keys %private_methods; - - my $also_private = eval 'qr{^' . join('|', keys %methods ) . '$}'; - - pod_coverage_ok $class, { also_private => [$also_private] }; - }; -} - diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/File-Which-1.21/xt/release/pod_spelling_common.t new/File-Which-1.22/xt/release/pod_spelling_common.t --- old/File-Which-1.21/xt/release/pod_spelling_common.t 2016-03-02 20:20:45.000000000 +0100 +++ new/File-Which-1.22/xt/release/pod_spelling_common.t 1970-01-01 01:00:00.000000000 +0100 @@ -1,27 +0,0 @@ -use strict; -use warnings; -use Test::More; -BEGIN { - plan skip_all => 'test requires Test::Pod::Spelling::CommonMistakes' - unless eval q{ use Test::Pod::Spelling::CommonMistakes; 1 }; - plan skip_all => 'test requires YAML' - unless eval q{ use YAML qw( LoadFile ); 1 }; -}; -use Test::Pod::Spelling::CommonMistakes; -use FindBin; -use File::Spec; - -my $config_filename = File::Spec->catfile( - $FindBin::Bin, 'release.yml' -); - -my $config; -$config = LoadFile($config_filename) - if -r $config_filename; - -plan skip_all => 'disabled' if $config->{pod_spelling_common}->{skip}; - -chdir(File::Spec->catdir($FindBin::Bin, File::Spec->updir, File::Spec->updir)); - -# FIXME test files in bin too. -all_pod_files_ok; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/File-Which-1.21/xt/release/pod_spelling_system.t new/File-Which-1.22/xt/release/pod_spelling_system.t --- old/File-Which-1.21/xt/release/pod_spelling_system.t 2016-03-02 20:20:45.000000000 +0100 +++ new/File-Which-1.22/xt/release/pod_spelling_system.t 1970-01-01 01:00:00.000000000 +0100 @@ -1,101 +0,0 @@ -use strict; -use warnings; -use Test::More; -BEGIN { - plan skip_all => 'test requires Test::Spelling' - unless eval q{ use Test::Spelling; 1 }; - plan skip_all => 'test requires YAML' - unless eval q{ use YAML; 1; }; -}; -use Test::Spelling; -use YAML qw( LoadFile ); -use FindBin; -use File::Spec; - -my $config_filename = File::Spec->catfile( - $FindBin::Bin, 'release.yml' -); - -my $config; -$config = LoadFile($config_filename) - if -r $config_filename; - -plan skip_all => 'disabled' if $config->{pod_spelling_system}->{skip}; - -chdir(File::Spec->catdir($FindBin::Bin, File::Spec->updir, File::Spec->updir)); - -add_stopwords(@{ $config->{pod_spelling_system}->{stopwords} }); -add_stopwords(<DATA>); -all_pod_files_spelling_ok; - -__DATA__ -Plicease -stdout -stderr -stdin -subref -loopback -username -os -Ollis -Mojolicious -plicease -CPAN -reinstall -TODO -filename -filenames -login -callback -callbacks -standalone -VMS -hostname -hostnames -TCP -UDP -IP -API -MSWin32 -OpenBSD -FreeBSD -NetBSD -unencrypted -WebSocket -WebSockets -timestamp -timestamps -poney -BackPAN -portably -RedHat -AIX -BSD -XS -FFI -perlish -optimizations -subdirectory -RESTful -SQLite -JavaScript -dir -plugins -munge -jQuery -namespace -PDF -PDFs -usernames -DBI -pluggable -APIs -SSL -JSON -YAML -uncommented -Solaris -OpenVMS -URI -URL -CGI diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/File-Which-1.21/xt/release/release.yml new/File-Which-1.22/xt/release/release.yml --- old/File-Which-1.21/xt/release/release.yml 2016-03-02 20:20:45.000000000 +0100 +++ new/File-Which-1.22/xt/release/release.yml 1970-01-01 01:00:00.000000000 +0100 @@ -1,22 +0,0 @@ ---- -pod_spelling_system: - skip: 0 - # list of words that are spelled correctly - # (regardless of what spell check thinks) - stopwords: - - 9x - - Bekman - - DocSet - - Einar - - Ellefsen - - OS2 - - Stas - - Win32 - - XP - -pod_coverage: - skip: 0 - # format is "Class#method" or "Class", regex allowed - # for either Class or method. - private: [] - diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/File-Which-1.21/xt/release/strict.t new/File-Which-1.22/xt/release/strict.t --- old/File-Which-1.21/xt/release/strict.t 2016-03-02 20:20:45.000000000 +0100 +++ new/File-Which-1.22/xt/release/strict.t 1970-01-01 01:00:00.000000000 +0100 @@ -1,15 +0,0 @@ -use strict; -use warnings; -use Test::More; -BEGIN { - plan skip_all => 'test requires Test::Strict' - unless eval q{ use Test::Strict; 1 }; -}; -use Test::Strict; -use FindBin; -use File::Spec; - -chdir(File::Spec->catdir($FindBin::Bin, File::Spec->updir, File::Spec->updir)); - -all_perl_files_ok( grep { -e $_ } qw( bin lib t Makefile.PL )); - diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/File-Which-1.21/xt/release/version.t new/File-Which-1.22/xt/release/version.t --- old/File-Which-1.21/xt/release/version.t 2016-03-02 20:20:45.000000000 +0100 +++ new/File-Which-1.22/xt/release/version.t 1970-01-01 01:00:00.000000000 +0100 @@ -1,44 +0,0 @@ -use strict; -use warnings; -use Test::More; -use FindBin (); -BEGIN { - - plan skip_all => "test requires Test::Version 2.00" - unless eval q{ - use Test::Version 2.00 qw( version_all_ok ), { - has_version => 1, - filename_match => sub { $_[0] !~ m{/(ConfigData|Install/Files)\.pm$} }, - }; - 1 - }; - - plan skip_all => "test requires Path::Class" - unless eval q{ use Path::Class qw( file dir ); 1 }; - plan skip_all => 'test requires YAML' - unless eval q{ use YAML; 1; }; -} - -use YAML qw( LoadFile ); -use FindBin; -use File::Spec; - -plan skip_all => "test not built yet (run dzil test)" - unless -e dir( $FindBin::Bin)->parent->parent->file('Makefile.PL') - || -e dir( $FindBin::Bin)->parent->parent->file('Build.PL'); - -my $config_filename = File::Spec->catfile( - $FindBin::Bin, 'release.yml' -); - -my $config; -$config = LoadFile($config_filename) - if -r $config_filename; - -if($config->{version}->{dir}) -{ - note "using dir " . $config->{version}->{dir} -} - -version_all_ok($config->{version}->{dir} ? ($config->{version}->{dir}) : ()); -done_testing;
