Ignore pax_global_header file.

This commit is contained in:
stevenpritchard
2008-07-02 18:27:25 +00:00
parent ba39225a62
commit 2624faad38
2 changed files with 4 additions and 1 deletions

View File

@@ -3,6 +3,7 @@
* Fix up the license list some more.
* Send STDIN to /dev/null in the child when executing Makefile.PL.
(Bug report from Peter Willis.)
* Ignore pax_global_header file.
1.77 2008-06-16

View File

@@ -10,7 +10,7 @@
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
#
# $Id: cpanspec,v 1.64 2008/06/23 23:55:11 stevenpritchard Exp $
# $Id: cpanspec,v 1.65 2008/07/02 18:27:25 stevenpritchard Exp $
our $NAME="cpanspec";
our $VERSION='1.78';
@@ -662,6 +662,8 @@ for my $file (@args) {
my $bogus=0;
for my $entry (list_files($archive, $type)) {
next if ($type eq 'tar' and $entry eq 'pax_global_header');
if ($entry !~ /^(?:.\/)?($name-(?:v\.?)?$version)(?:\/|$)/) {
warn "BOGUS PATH DETECTED: $entry\n";
$bogus++;