Skip to content

Commit

Permalink
Browse files Browse the repository at this point in the history
Try to make the release parsing output readable again.
Older archives clutter the terminal output with "Invalid header block at
offset unknown at
/home/metacpan/carton/metacpan-api/lib/perl5/Archive/Any/Plugin/Tar.pm
line 21."
  • Loading branch information
oalders committed Sep 27, 2014
1 parent aa35b20 commit 44ee8d0
Showing 1 changed file with 5 additions and 0 deletions.
5 changes: 5 additions & 0 deletions lib/MetaCPAN/Script/Release.pm
Expand Up @@ -597,6 +597,11 @@ sub _build_perms {
return \%authors;
}

$SIG{__WARN__} = sub {
my $msg = shift;
warn $msg unless $msg =~ m{Invalid header block at offset unknown at};
};

__PACKAGE__->meta->make_immutable;
1;

Expand Down

0 comments on commit 44ee8d0

Please sign in to comment.