Script 'mail_helper' called by obssrc
Hello community,
here is the log from the commit of package perl-File-Listing for
openSUSE:Factory checked in at 2022-04-28 23:07:03
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-File-Listing (Old)
and /work/SRC/openSUSE:Factory/.perl-File-Listing.new.1538 (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-File-Listing"
Thu Apr 28 23:07:03 2022 rev:14 rq:972832 version:6.15
Changes:
--------
--- /work/SRC/openSUSE:Factory/perl-File-Listing/perl-File-Listing.changes
2020-12-03 18:42:34.558140165 +0100
+++
/work/SRC/openSUSE:Factory/.perl-File-Listing.new.1538/perl-File-Listing.changes
2022-04-28 23:07:05.520630207 +0200
@@ -1,0 +2,13 @@
+Mon Apr 18 03:13:16 UTC 2022 - Tina M??ller <[email protected]>
+
+- updated to 6.15
+ see /usr/share/doc/packages/perl-File-Listing/Changes
+
+ 6.15 2022-04-17 04:09:58 -0600
+ - Main git repository has now been detached from the original
+ repository (originally it was a fork). The old repository
+ can be found at https://github.com/gisle/file-listing
+ - Adjust test suite to handle systems that cannot handle
+ year 2038+ dates (gh#24)
+
+-------------------------------------------------------------------
Old:
----
File-Listing-6.14.tar.gz
New:
----
File-Listing-6.15.tar.gz
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ perl-File-Listing.spec ++++++
--- /var/tmp/diff_new_pack.yBeost/_old 2022-04-28 23:07:06.032630765 +0200
+++ /var/tmp/diff_new_pack.yBeost/_new 2022-04-28 23:07:06.036630769 +0200
@@ -1,7 +1,7 @@
#
# spec file for package perl-File-Listing
#
-# Copyright (c) 2020 SUSE LLC
+# Copyright (c) 2022 SUSE LLC
#
# All modifications and additions to the file contributed by third parties
# remain the property of their copyright owners, unless otherwise agreed
@@ -16,18 +16,16 @@
#
+%define cpan_name File-Listing
Name: perl-File-Listing
-Version: 6.14
+Version: 6.15
Release: 0
-%define cpan_name File-Listing
-Summary: Parse directory listing
License: Artistic-1.0 OR GPL-1.0-or-later
-Group: Development/Libraries/Perl
+Summary: Parse directory listing
URL: https://metacpan.org/release/%{cpan_name}
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
BuildRequires: perl
BuildRequires: perl-macros
BuildRequires: perl(HTTP::Date)
@@ -40,12 +38,12 @@
to parse directory listings.
%prep
-%setup -q -n %{cpan_name}-%{version}
+%autosetup -n %{cpan_name}-%{version}
find . -type f ! -path "*/t/*" ! -name "*.pl" ! -path "*/bin/*" ! -path
"*/script/*" ! -name "configure" -print0 | xargs -0 chmod 644
%build
perl Makefile.PL INSTALLDIRS=vendor
-make %{?_smp_mflags}
+%make_build
%check
make test
@@ -56,7 +54,6 @@
%perl_gen_filelist
%files -f %{name}.files
-%defattr(-,root,root,755)
%doc author.yml Changes Changes.original README
%license LICENSE
++++++ File-Listing-6.14.tar.gz -> File-Listing-6.15.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/File-Listing-6.14/Changes
new/File-Listing-6.15/Changes
--- old/File-Listing-6.14/Changes 2020-11-30 13:48:09.000000000 +0100
+++ new/File-Listing-6.15/Changes 2022-04-17 12:09:59.000000000 +0200
@@ -1,5 +1,12 @@
Revision history for File-Listing
+6.15 2022-04-17 04:09:58 -0600
+ - Main git repository has now been detached from the original
+ repository (originally it was a fork). The old repository
+ can be found at https://github.com/gisle/file-listing
+ - Adjust test suite to handle systems that cannot handle
+ year 2038+ dates (gh#24)
+
6.14 2020-11-30 05:48:07 -0700
- Production version identical to 6.12_01
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/File-Listing-6.14/INSTALL
new/File-Listing-6.15/INSTALL
--- old/File-Listing-6.14/INSTALL 2020-11-30 13:48:09.000000000 +0100
+++ new/File-Listing-6.15/INSTALL 2022-04-17 12:09:59.000000000 +0200
@@ -21,8 +21,11 @@
## Manual installation
-As a last resort, you can manually install it. Download the tarball, untar it,
-install configure prerequisites (see below), then build it:
+As a last resort, you can manually install it. If you have not already
+downloaded the release tarball, you can find the download link on the module's
+MetaCPAN page: https://metacpan.org/pod/File::Listing
+
+Untar the tarball, install configure prerequisites (see below), then build it:
% perl Makefile.PL
% make && make test
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/File-Listing-6.14/LICENSE
new/File-Listing-6.15/LICENSE
--- old/File-Listing-6.14/LICENSE 2020-11-30 13:48:09.000000000 +0100
+++ new/File-Listing-6.15/LICENSE 2022-04-17 12:09:59.000000000 +0200
@@ -292,21 +292,21 @@
- "Package" refers to the collection of files distributed by the Copyright
Holder, and derivatives of that collection of files created through
- textual modification.
+ textual modification.
- "Standard Version" refers to such a Package if it has not been modified,
or has been modified in accordance with the wishes of the Copyright
- Holder.
+ Holder.
- "Copyright Holder" is whoever is named in the copyright or copyrights for
- the package.
+ the package.
- "You" is you, if you're thinking about copying or distributing this
Package.
- "Reasonable copying fee" is whatever you can justify on the basis of media
cost, duplication charges, time of people involved, and so on. (You will
not be required to justify it to the Copyright Holder, but only to the
- computing community at large as a market that must bear the fee.)
+ computing community at large as a market that must bear the fee.)
- "Freely Available" means that no fee is charged for the item itself, though
there may be fees involved in handling the item. It also means that
recipients of the item may redistribute it under the same conditions they
- received it.
+ received it.
1. You may make and give away verbatim copies of the source form of the
Standard Version of this Package without restriction, provided that you
@@ -373,7 +373,7 @@
9. THIS PACKAGE IS PROVIDED "AS IS" AND WITHOUT ANY EXPRESS OR IMPLIED
WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF
-MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
+MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.
The End
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/File-Listing-6.14/MANIFEST
new/File-Listing-6.15/MANIFEST
--- old/File-Listing-6.14/MANIFEST 2020-11-30 13:48:09.000000000 +0100
+++ new/File-Listing-6.15/MANIFEST 2022-04-17 12:09:59.000000000 +0200
@@ -1,4 +1,4 @@
-# This file was automatically generated by Dist::Zilla::Plugin::Manifest
v6.015.
+# This file was automatically generated by Dist::Zilla::Plugin::Manifest
v6.024.
Changes
Changes.original
INSTALL
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/File-Listing-6.14/META.json
new/File-Listing-6.15/META.json
--- old/File-Listing-6.14/META.json 2020-11-30 13:48:09.000000000 +0100
+++ new/File-Listing-6.15/META.json 2022-04-17 12:09:59.000000000 +0200
@@ -5,7 +5,7 @@
"Graham Ollis <[email protected]>"
],
"dynamic_config" : 0,
- "generated_by" : "Dist::Zilla version 6.015, CPAN::Meta::Converter version
2.150010",
+ "generated_by" : "Dist::Zilla version 6.024, CPAN::Meta::Converter version
2.150010",
"license" : [
"perl_5"
],
@@ -27,13 +27,70 @@
}
},
"develop" : {
+ "recommends" : {
+ "Dist::Zilla::Plugin::Author::Plicease::Thanks" : "0",
+ "Dist::Zilla::Plugin::Author::Plicease::Upload" : "0",
+ "Dist::Zilla::Plugin::MetaNoIndex" : "0",
+ "Dist::Zilla::Plugin::RemovePrereqs" : "0",
+ "Dist::Zilla::PluginBundle::Author::Plicease" : "2.57",
+ "Perl::Critic::Policy::BuiltinFunctions::ProhibitBooleanGrep" :
"0",
+ "Perl::Critic::Policy::BuiltinFunctions::ProhibitStringyEval" :
"0",
+ "Perl::Critic::Policy::BuiltinFunctions::ProhibitStringySplit" :
"0",
+ "Perl::Critic::Policy::BuiltinFunctions::ProhibitVoidGrep" : "0",
+ "Perl::Critic::Policy::BuiltinFunctions::ProhibitVoidMap" : "0",
+ "Perl::Critic::Policy::ClassHierarchies::ProhibitOneArgBless" :
"0",
+ "Perl::Critic::Policy::CodeLayout::ProhibitHardTabs" : "0",
+ "Perl::Critic::Policy::CodeLayout::ProhibitTrailingWhitespace" :
"0",
+ "Perl::Critic::Policy::CodeLayout::RequireConsistentNewlines" :
"0",
+ "Perl::Critic::Policy::Community::ArrayAssignAref" : "0",
+ "Perl::Critic::Policy::Community::BarewordFilehandles" : "0",
+ "Perl::Critic::Policy::Community::ConditionalDeclarations" : "0",
+ "Perl::Critic::Policy::Community::ConditionalImplicitReturn" : "0",
+ "Perl::Critic::Policy::Community::DeprecatedFeatures" : "0",
+ "Perl::Critic::Policy::Community::DiscouragedModules" : "0",
+ "Perl::Critic::Policy::Community::DollarAB" : "0",
+ "Perl::Critic::Policy::Community::Each" : "0",
+ "Perl::Critic::Policy::Community::IndirectObjectNotation" : "0",
+ "Perl::Critic::Policy::Community::LexicalForeachIterator" : "0",
+ "Perl::Critic::Policy::Community::LoopOnHash" : "0",
+ "Perl::Critic::Policy::Community::ModPerl" : "0",
+ "Perl::Critic::Policy::Community::OpenArgs" : "0",
+ "Perl::Critic::Policy::Community::OverloadOptions" : "0",
+ "Perl::Critic::Policy::Community::POSIXImports" : "0",
+ "Perl::Critic::Policy::Community::PackageMatchesFilename" : "0",
+ "Perl::Critic::Policy::Community::PreferredAlternatives" : "0",
+ "Perl::Critic::Policy::Community::StrictWarnings" : "0",
+ "Perl::Critic::Policy::Community::Threads" : "0",
+ "Perl::Critic::Policy::Community::Wantarray" : "0",
+ "Perl::Critic::Policy::Community::WarningsSwitch" : "0",
+ "Perl::Critic::Policy::Community::WhileDiamondDefaultAssignment" :
"0",
+
"Perl::Critic::Policy::ControlStructures::ProhibitLabelsWithSpecialBlockNames"
: "0",
+
"Perl::Critic::Policy::ControlStructures::ProhibitMutatingListFunctions" : "0",
+ "Perl::Critic::Policy::ControlStructures::ProhibitUnreachableCode"
: "0",
+ "Perl::Critic::Policy::InputOutput::ProhibitBarewordFileHandles" :
"0",
+ "Perl::Critic::Policy::InputOutput::ProhibitJoinedReadline" : "0",
+ "Perl::Critic::Policy::InputOutput::ProhibitTwoArgOpen" : "0",
+ "Perl::Critic::Policy::Miscellanea::ProhibitFormats" : "0",
+ "Perl::Critic::Policy::Miscellanea::ProhibitUselessNoCritic" : "0",
+ "Perl::Critic::Policy::Modules::ProhibitConditionalUseStatements"
: "0",
+ "Perl::Critic::Policy::Modules::RequireNoMatchVarsWithUseEnglish"
: "0",
+ "Perl::Critic::Policy::Objects::ProhibitIndirectSyntax" : "0",
+ "Perl::Critic::Policy::RegularExpressions::ProhibitUselessTopic" :
"0",
+ "Perl::Critic::Policy::Subroutines::ProhibitNestedSubs" : "0",
+
"Perl::Critic::Policy::ValuesAndExpressions::ProhibitMixedBooleanOperators" :
"0",
+
"Perl::Critic::Policy::ValuesAndExpressions::ProhibitSpecialLiteralHeredocTerminator"
: "0",
+
"Perl::Critic::Policy::ValuesAndExpressions::RequireUpperCaseHeredocTerminator"
: "0",
+ "Perl::Critic::Policy::Variables::ProhibitPerl4PackageNames" : "0",
+ "Perl::Critic::Policy::Variables::ProhibitUnusedVariables" : "0",
+ "Software::License::Perl_5" : "0"
+ },
"requires" : {
"File::Spec" : "0",
"FindBin" : "0",
"Perl::Critic" : "0",
- "Test2::Require::Module" : "0.000060",
+ "Test2::Require::Module" : "0.000121",
"Test2::Tools::PerlCritic" : "0",
- "Test2::V0" : "0.000060",
+ "Test2::V0" : "0.000121",
"Test::CPAN::Changes" : "0",
"Test::EOL" : "0",
"Test::Fixme" : "0.07",
@@ -49,17 +106,13 @@
},
"runtime" : {
"requires" : {
- "Carp" : "0",
- "Exporter" : "0",
+ "Exporter" : "5.57",
"HTTP::Date" : "0",
- "Time::Local" : "0",
- "base" : "0",
"perl" : "5.006"
}
},
"test" : {
"requires" : {
- "Data::Dumper" : "0",
"Test::More" : "0.98",
"perl" : "5.006"
}
@@ -77,7 +130,7 @@
"web" : "https://github.com/PerlAlien/File-Listing";
}
},
- "version" : "6.14",
+ "version" : "6.15",
"x_contributors" : [
"Gisle Aas",
"Graham Ollis <[email protected]>",
@@ -129,8 +182,8 @@
"sasao",
"uid39246"
],
- "x_generated_by_perl" : "v5.33.3",
- "x_serialization_backend" : "Cpanel::JSON::XS version 4.24",
+ "x_generated_by_perl" : "v5.35.10",
+ "x_serialization_backend" : "Cpanel::JSON::XS version 4.27",
"x_spdx_expression" : "Artistic-1.0-Perl OR GPL-1.0-or-later",
"x_use_unsafe_inc" : 0
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/File-Listing-6.14/META.yml
new/File-Listing-6.15/META.yml
--- old/File-Listing-6.14/META.yml 2020-11-30 13:48:09.000000000 +0100
+++ new/File-Listing-6.15/META.yml 2022-04-17 12:09:59.000000000 +0200
@@ -4,14 +4,13 @@
- 'Gisle Aas'
- 'Graham Ollis <[email protected]>'
build_requires:
- Data::Dumper: '0'
Test::More: '0.98'
perl: '5.006'
configure_requires:
ExtUtils::MakeMaker: '0'
perl: '5.006'
dynamic_config: 0
-generated_by: 'Dist::Zilla version 6.015, CPAN::Meta::Converter version
2.150010'
+generated_by: 'Dist::Zilla version 6.024, CPAN::Meta::Converter version
2.150010'
license: perl
meta-spec:
url: http://module-build.sourceforge.net/META-spec-v1.4.html
@@ -21,17 +20,14 @@
directory:
- maint
requires:
- Carp: '0'
- Exporter: '0'
+ Exporter: '5.57'
HTTP::Date: '0'
- Time::Local: '0'
- base: '0'
perl: '5.006'
resources:
bugtracker: https://github.com/PerlAlien/File-Listing/issues
homepage: https://metacpan.org/pod/File::Listing
repository: git://github.com/PerlAlien/File-Listing.git
-version: '6.14'
+version: '6.15'
x_contributors:
- 'Gisle Aas'
- 'Graham Ollis <[email protected]>'
@@ -82,7 +78,7 @@
- ruff
- sasao
- uid39246
-x_generated_by_perl: v5.33.3
+x_generated_by_perl: v5.35.10
x_serialization_backend: 'YAML::Tiny version 1.73'
x_spdx_expression: 'Artistic-1.0-Perl OR GPL-1.0-or-later'
x_use_unsafe_inc: 0
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/File-Listing-6.14/Makefile.PL
new/File-Listing-6.15/Makefile.PL
--- old/File-Listing-6.14/Makefile.PL 2020-11-30 13:48:09.000000000 +0100
+++ new/File-Listing-6.15/Makefile.PL 2022-04-17 12:09:59.000000000 +0200
@@ -5,7 +5,7 @@
exit;
}
}
-# This file was automatically generated by Dist::Zilla::Plugin::MakeMaker
v6.015.
+# This file was automatically generated by Dist::Zilla::Plugin::MakeMaker
v6.024.
use strict;
use warnings;
@@ -24,17 +24,13 @@
"MIN_PERL_VERSION" => "5.006",
"NAME" => "File::Listing",
"PREREQ_PM" => {
- "Carp" => 0,
- "Exporter" => 0,
- "HTTP::Date" => 0,
- "Time::Local" => 0,
- "base" => 0
+ "Exporter" => "5.57",
+ "HTTP::Date" => 0
},
"TEST_REQUIRES" => {
- "Data::Dumper" => 0,
"Test::More" => "0.98"
},
- "VERSION" => "6.14",
+ "VERSION" => "6.15",
"test" => {
"TESTS" => "t/*.t"
}
@@ -42,13 +38,9 @@
my %FallbackPrereqs = (
- "Carp" => 0,
- "Data::Dumper" => 0,
- "Exporter" => 0,
+ "Exporter" => "5.57",
"HTTP::Date" => 0,
- "Test::More" => "0.98",
- "Time::Local" => 0,
- "base" => 0
+ "Test::More" => "0.98"
);
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/File-Listing-6.14/README new/File-Listing-6.15/README
--- old/File-Listing-6.14/README 2020-11-30 13:48:09.000000000 +0100
+++ new/File-Listing-6.15/README 2022-04-17 12:09:59.000000000 +0200
@@ -4,7 +4,7 @@
VERSION
- version 6.14
+ version 6.15
SYNOPSIS
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/File-Listing-6.14/dist.ini
new/File-Listing-6.15/dist.ini
--- old/File-Listing-6.14/dist.ini 2020-11-30 13:48:09.000000000 +0100
+++ new/File-Listing-6.15/dist.ini 2022-04-17 12:09:59.000000000 +0200
@@ -4,19 +4,22 @@
license = Perl_5
copyright_holder = Gisle Aas
copyright_year = 1996-2020
-version = 6.14
+version = 6.15
[@Author::Plicease]
:version = 2.57
-travis_status = 1
-travis_com = 1
release_tests = 1
github_user = PerlAlien
installer = MakeMaker
+workflow = static
+workflow = linux
+
[RemovePrereqs]
remove = strict
remove = warnings
+remove = Carp
+remove = Time::Local
[Author::Plicease::Upload]
cpan = 1
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/File-Listing-6.14/lib/File/Listing.pm
new/File-Listing-6.15/lib/File/Listing.pm
--- old/File-Listing-6.14/lib/File/Listing.pm 2020-11-30 13:48:09.000000000
+0100
+++ new/File-Listing-6.15/lib/File/Listing.pm 2022-04-17 12:09:59.000000000
+0200
@@ -4,10 +4,10 @@
use warnings;
use Carp ();
use HTTP::Date qw(str2time);
-use base qw( Exporter );
+use Exporter 5.57 qw( import );
# ABSTRACT: Parse directory listing
-our $VERSION = '6.14'; # VERSION
+our $VERSION = '6.15'; # VERSION
sub Version { $File::Listing::VERSION; }
@@ -121,7 +121,7 @@
push(@files, $pkg->line($line, $tz, $error));
}
}
- wantarray ? @files : \@files; ## no critic (Freenode::Wantarray)
+ wantarray ? @files : \@files; ## no critic (Community::Wantarray)
}
@@ -399,7 +399,7 @@
=head1 VERSION
-version 6.14
+version 6.15
=head1 SYNOPSIS
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/File-Listing-6.14/perlcriticrc
new/File-Listing-6.15/perlcriticrc
--- old/File-Listing-6.14/perlcriticrc 2020-11-30 13:48:09.000000000 +0100
+++ new/File-Listing-6.15/perlcriticrc 2022-04-17 12:09:59.000000000 +0200
@@ -1,29 +1,29 @@
severity = 1
only = 1
-[Freenode::ArrayAssignAref]
-[Freenode::BarewordFilehandles]
-[Freenode::ConditionalDeclarations]
-[Freenode::ConditionalImplicitReturn]
-[Freenode::DeprecatedFeatures]
-[Freenode::DiscouragedModules]
-[Freenode::DollarAB]
-[Freenode::Each]
-[Freenode::IndirectObjectNotation]
-[Freenode::LexicalForeachIterator]
-[Freenode::LoopOnHash]
-[Freenode::ModPerl]
-[Freenode::OpenArgs]
-[Freenode::OverloadOptions]
-[Freenode::POSIXImports]
-[Freenode::PackageMatchesFilename]
-[Freenode::PreferredAlternatives]
-[Freenode::StrictWarnings]
+[Community::ArrayAssignAref]
+[Community::BarewordFilehandles]
+[Community::ConditionalDeclarations]
+[Community::ConditionalImplicitReturn]
+[Community::DeprecatedFeatures]
+[Community::DiscouragedModules]
+[Community::DollarAB]
+[Community::Each]
+[Community::IndirectObjectNotation]
+[Community::LexicalForeachIterator]
+[Community::LoopOnHash]
+[Community::ModPerl]
+[Community::OpenArgs]
+[Community::OverloadOptions]
+[Community::POSIXImports]
+[Community::PackageMatchesFilename]
+[Community::PreferredAlternatives]
+[Community::StrictWarnings]
extra_importers = Test2::V0
-[Freenode::Threads]
-[Freenode::Wantarray]
-[Freenode::WarningsSwitch]
-[Freenode::WhileDiamondDefaultAssignment]
+[Community::Threads]
+[Community::Wantarray]
+[Community::WarningsSwitch]
+[Community::WhileDiamondDefaultAssignment]
[BuiltinFunctions::ProhibitBooleanGrep]
[BuiltinFunctions::ProhibitStringyEval]
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/File-Listing-6.14/t/00_diag.t
new/File-Listing-6.15/t/00_diag.t
--- old/File-Listing-6.14/t/00_diag.t 2020-11-30 13:48:09.000000000 +0100
+++ new/File-Listing-6.15/t/00_diag.t 2022-04-17 12:09:59.000000000 +0200
@@ -10,13 +10,10 @@
my $post_diag;
$modules{$_} = $_ for qw(
- Carp
- Data::Dumper
Exporter
ExtUtils::MakeMaker
HTTP::Date
Test::More
- Time::Local
);
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/File-Listing-6.14/t/file_listing.t
new/File-Listing-6.15/t/file_listing.t
--- old/File-Listing-6.14/t/file_listing.t 2020-11-30 13:48:09.000000000
+0100
+++ new/File-Listing-6.15/t/file_listing.t 2022-04-17 12:09:59.000000000
+0200
@@ -2,7 +2,6 @@
use warnings;
use File::Listing;
use Test::More;
-use Data::Dumper qw( Dumper );
subtest 'unix' => sub {
@@ -153,7 +152,6 @@
my @listing = parse_dir(shift @dir, undef, "apache");
ok(@listing);
- note Dumper(\@listing);
};
}
@@ -172,14 +170,64 @@
[localtime($time)]->[5] + 1900;
};
+ ## hack to test the test of 2038 bug systems when
+ ## you do not have one handy.
+ #require Test2::Mock;
+ #my $mock = Test2::Mock->new( class => 'Time::Local' );
+ #$mock->around( 'timelocal' => sub {
+ # my $orig = shift;
+ # my(undef,undef,undef,undef,undef, $year) = @_;
+ # die "frooble bits" if $year >= 2038;
+ # $orig->(@_);
+ #});
+
+ my $max_year = 2500;
+
+ local $@;
+ eval {
+ require Time::Local;
+ Time::Local::timelocal(0, 30, 16, 29, 5, 2038);
+ };
+
+ if(my $error = $@)
+ {
+ diag '';
+ diag "WARNING WARNING WARNING";
+ diag '';
+ diag "Your Perl / Operating System does not support dates in 2038.";
+ diag "(probably due to 32 bit unix epoch).";
+ diag "I will skip tests with these types of dates, but you should";
+ diag "upgrade your Perl / Operating System if possible";
+ diag '';
+ diag "actual exception: $error";
+ diag '';
+ diag "WARNING WARNING WARNING";
+ $max_year = 2037;
+ }
+
# Note: explicitly not tested are two digit years,
# because the current behavior is probably wrong.
# Right now we assume 9x is 199x and 0-89 is 20xx,
# which is definitely wrong in the long term, but
# I don't even have any examples where apache provides
# a two digit date.
- foreach my $year (1970..2500) {
- is( $parse->("$year-06-29 16:30"), $year, "year = $year" );
+ foreach my $year (1970..$max_year) {
+ local $@;
+
+ my $got = eval { $parse->("$year-06-29 16:30") };
+ my $error = $@;
+ my $expected = $year;
+ my $name = "year = $year";
+
+ if($error)
+ {
+ fail($name);
+ diag "parser threw exception: $error";
+ }
+ else
+ {
+ is( $got, $expected, $name );
+ }
}
};
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/File-Listing-6.14/xt/author/pod_coverage.t
new/File-Listing-6.15/xt/author/pod_coverage.t
--- old/File-Listing-6.14/xt/author/pod_coverage.t 2020-11-30
13:48:09.000000000 +0100
+++ new/File-Listing-6.15/xt/author/pod_coverage.t 2022-04-17
12:09:59.000000000 +0200
@@ -31,10 +31,10 @@
my @private_classes;
my %private_methods;
-push @{ $config->{pod_coverage}->{private} },
+push $config->{pod_coverage}->{private}->@*,
'Alien::.*::Install::Files#Inline';
-foreach my $private (@{ $config->{pod_coverage}->{private} })
+foreach my $private ($config->{pod_coverage}->{private}->@*)
{
my($class,$method) = split /#/, $private;
if(defined $class && $class ne '')
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/File-Listing-6.14/xt/author/pod_spelling_system.t
new/File-Listing-6.15/xt/author/pod_spelling_system.t
--- old/File-Listing-6.14/xt/author/pod_spelling_system.t 2020-11-30
13:48:09.000000000 +0100
+++ new/File-Listing-6.15/xt/author/pod_spelling_system.t 2022-04-17
12:09:59.000000000 +0200
@@ -24,7 +24,7 @@
chdir(File::Spec->catdir($FindBin::Bin, File::Spec->updir, File::Spec->updir));
-add_stopwords(@{ $config->{pod_spelling_system}->{stopwords} });
+add_stopwords($config->{pod_spelling_system}->{stopwords}->@*);
add_stopwords(qw(
Plicease
stdout
