X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=helpers%2Fpreflight;h=56e28307ea52566aa121f3d92398a2191cd2feb8;hb=7b418de8a06fed447e6642cc3b905d187ba66a3c;hp=6d104beeaf721201d7f6d5e5523c5aa78bd81688;hpb=edb4539ab17337bdc7b1f64aded94b1c48b75a59;p=p5sagit%2FDistar.git diff --git a/helpers/preflight b/helpers/preflight index 6d104be..56e2830 100755 --- a/helpers/preflight +++ b/helpers/preflight @@ -4,7 +4,6 @@ use warnings FATAL => 'all'; use Config; use File::Spec; use File::Find; -use ExtUtils::MakeMaker (); use Getopt::Long qw(:config gnu_getopt); GetOptions( @@ -22,14 +21,6 @@ if (system("git rev-parse --quiet --verify v$version >$null") == 0) { die "Tag v$version already exists!"; } -File::Find::find({ no_chdir => 1, wanted => sub { - return - unless -f && /\.pm$/; - my $file_version = MM->parse_version($_); - die "Module $_ version $file_version doesn't match dist version $version" - unless $file_version eq 'undef' || $file_version eq $version; -}}, 'lib'); - for (scalar `"$make" manifest 2>&1 >$null`) { $_ && die "$make manifest changed:\n$_ Go check it and retry"; }