summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorChris 'BinGOs' Williams <chris@bingosnet.co.uk>2016-12-15 14:31:00 +0000
committerChris 'BinGOs' Williams <chris@bingosnet.co.uk>2016-12-15 14:31:00 +0000
commit00614f1b218d4346c49a54c35a0e746bcc61ca99 (patch)
tree60974ec90675f5593dc0b6970a12ab75f556153d
parent7a65503b47db3b8dbe630d34b49208a49fc80c51 (diff)
downloadperl-00614f1b218d4346c49a54c35a0e746bcc61ca99.tar.gz
Update Archive-Tar to CPAN version 2.20
[DELTA] 2.20 15/12/2016 (AGRUNDMA) - Check for gzip/bzip2 before round tripping gz/bz2 files in tests
-rwxr-xr-xPorting/Maintainers.pl2
-rw-r--r--cpan/Archive-Tar/lib/Archive/Tar.pm2
-rw-r--r--cpan/Archive-Tar/lib/Archive/Tar/Constant.pm2
-rw-r--r--cpan/Archive-Tar/lib/Archive/Tar/File.pm2
-rw-r--r--cpan/Archive-Tar/t/09_roundtrip.t2
5 files changed, 6 insertions, 4 deletions
diff --git a/Porting/Maintainers.pl b/Porting/Maintainers.pl
index a759592d84..de7942cb5a 100755
--- a/Porting/Maintainers.pl
+++ b/Porting/Maintainers.pl
@@ -120,7 +120,7 @@ use File::Glob qw(:case);
%Modules = (
'Archive::Tar' => {
- 'DISTRIBUTION' => 'BINGOS/Archive-Tar-2.18.tar.gz',
+ 'DISTRIBUTION' => 'BINGOS/Archive-Tar-2.20.tar.gz',
'FILES' => q[cpan/Archive-Tar],
'BUGS' => 'bug-archive-tar@rt.cpan.org',
'EXCLUDED' => [
diff --git a/cpan/Archive-Tar/lib/Archive/Tar.pm b/cpan/Archive-Tar/lib/Archive/Tar.pm
index cb7c351118..349dcf1659 100644
--- a/cpan/Archive-Tar/lib/Archive/Tar.pm
+++ b/cpan/Archive-Tar/lib/Archive/Tar.pm
@@ -31,7 +31,7 @@ use vars qw[$DEBUG $error $VERSION $WARN $FOLLOW_SYMLINK $CHOWN $CHMOD
$DEBUG = 0;
$WARN = 1;
$FOLLOW_SYMLINK = 0;
-$VERSION = "2.18";
+$VERSION = "2.20";
$CHOWN = 1;
$CHMOD = 1;
$SAME_PERMISSIONS = $> == 0 ? 1 : 0;
diff --git a/cpan/Archive-Tar/lib/Archive/Tar/Constant.pm b/cpan/Archive-Tar/lib/Archive/Tar/Constant.pm
index 07eb33d44a..c1356ade16 100644
--- a/cpan/Archive-Tar/lib/Archive/Tar/Constant.pm
+++ b/cpan/Archive-Tar/lib/Archive/Tar/Constant.pm
@@ -3,7 +3,7 @@ package Archive::Tar::Constant;
BEGIN {
require Exporter;
- $VERSION = '2.18';
+ $VERSION = '2.20';
@ISA = qw[Exporter];
require Time::Local if $^O eq "MacOS";
diff --git a/cpan/Archive-Tar/lib/Archive/Tar/File.pm b/cpan/Archive-Tar/lib/Archive/Tar/File.pm
index 3cd5a5226b..3e4cdbc2ec 100644
--- a/cpan/Archive-Tar/lib/Archive/Tar/File.pm
+++ b/cpan/Archive-Tar/lib/Archive/Tar/File.pm
@@ -13,7 +13,7 @@ use Archive::Tar::Constant;
use vars qw[@ISA $VERSION];
#@ISA = qw[Archive::Tar];
-$VERSION = '2.18';
+$VERSION = '2.20';
### set value to 1 to oct() it during the unpack ###
diff --git a/cpan/Archive-Tar/t/09_roundtrip.t b/cpan/Archive-Tar/t/09_roundtrip.t
index 586344814b..8fb72a8023 100644
--- a/cpan/Archive-Tar/t/09_roundtrip.t
+++ b/cpan/Archive-Tar/t/09_roundtrip.t
@@ -123,11 +123,13 @@ for my $archive_name (@file_only_archives) {
sub can_tar_gzip {
my ($tar_help) = @_;
+ return 0 unless can_run('gzip');
$tar_help =~ /-z, --gzip|-z,.+gzip/;
}
sub can_tar_bzip2 {
my ($tar_help) = @_;
+ return 0 unless can_run('bzip2');
$tar_help =~ /-j, --bzip2|-j,+bzip2/;
}