summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJames E Keenan <jkeenan@cpan.org>2020-07-25 21:52:46 -0400
committerJames E Keenan <jkeenan@cpan.org>2020-07-25 21:52:46 -0400
commitf4b02d787ced7a9059cd0cb982dce7d0e04db386 (patch)
tree1857414e834b2760326a40eff43160b9b4f052ca
parent81295a42ad856da581d910c540f5bb7a18b8f7e2 (diff)
downloadperl-f4b02d787ced7a9059cd0cb982dce7d0e04db386.tar.gz
File-Path: sync in CPAN version 2.17
-rwxr-xr-xPorting/Maintainers.pl2
-rw-r--r--cpan/File-Path/lib/File/Path.pm6
-rw-r--r--cpan/File-Path/t/Path_root.t1
3 files changed, 4 insertions, 5 deletions
diff --git a/Porting/Maintainers.pl b/Porting/Maintainers.pl
index 64cfc792d8..3f81c7713c 100755
--- a/Porting/Maintainers.pl
+++ b/Porting/Maintainers.pl
@@ -505,7 +505,7 @@ use File::Glob qw(:case);
},
'File::Path' => {
- 'DISTRIBUTION' => 'JKEENAN/File-Path-2.16.tar.gz',
+ 'DISTRIBUTION' => 'JKEENAN/File-Path-2.17.tar.gz',
'FILES' => q[cpan/File-Path],
'EXCLUDED' => [
qw(t/Path-Class.t),
diff --git a/cpan/File-Path/lib/File/Path.pm b/cpan/File-Path/lib/File/Path.pm
index 22e53f8ff9..681bb44459 100644
--- a/cpan/File-Path/lib/File/Path.pm
+++ b/cpan/File-Path/lib/File/Path.pm
@@ -18,7 +18,7 @@ BEGIN {
use Exporter ();
use vars qw($VERSION @ISA @EXPORT @EXPORT_OK);
-$VERSION = '2.16';
+$VERSION = '2.17';
$VERSION = eval $VERSION;
@ISA = qw(Exporter);
@EXPORT = qw(mkpath rmtree);
@@ -633,7 +633,7 @@ File::Path - Create or remove directory trees
=head1 VERSION
-2.16 - released August 31 2018.
+2.17 - released July 18 2020.
=head1 SYNOPSIS
@@ -1277,7 +1277,7 @@ Contributors to File::Path, in alphabetical order by first name.
=head1 COPYRIGHT
This module is copyright (C) Charles Bailey, Tim Bunce, David Landgren,
-James Keenan and Richard Elberger 1995-2018. All rights reserved.
+James Keenan and Richard Elberger 1995-2020. All rights reserved.
=head1 LICENSE
diff --git a/cpan/File-Path/t/Path_root.t b/cpan/File-Path/t/Path_root.t
index 8af39f791b..6050c2e339 100644
--- a/cpan/File-Path/t/Path_root.t
+++ b/cpan/File-Path/t/Path_root.t
@@ -112,7 +112,6 @@ sub max_g {
my $max_gid = 0;
my $max_group = undef;
while ( my @g = getgrent() ) {
- print Dumper @g;
if ($max_gid < $g[2]) {
$max_gid = $g[2];
$max_group = $g[0];