Distribute the cpanfile too

master
Hauke D 7 years ago
parent 0f67a1cbfa
commit f7b5822176

@ -398,7 +398,7 @@ if (my $dist = $opts{dist}) {
my $zip = Archive::Zip->new(); my $zip = Archive::Zip->new();
$zip->addTree($basedir->subdir('web').'', dir($dist).''); $zip->addTree($basedir->subdir('web').'', dir($dist).'');
$zip->addFile($basedir->file($_).'', dir($dist)->file($_).'') for $zip->addFile($basedir->file($_).'', dir($dist)->file($_).'') for
qw/ README.md LICENSE_artistic.txt LICENSE_gpl.txt /; qw/ README.md LICENSE_artistic.txt LICENSE_gpl.txt cpanfile /;
$zip->writeToFileNamed("$zipfn") == AZ_OK or die "$zipfn write error"; $zip->writeToFileNamed("$zipfn") == AZ_OK or die "$zipfn write error";
say STDERR "# Wrote to $zipfn:"; say STDERR "# Wrote to $zipfn:";
my $unzip = Archive::Zip->new("$zipfn"); my $unzip = Archive::Zip->new("$zipfn");

Loading…
Cancel
Save