X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/31b6f23ed55c460d17977de41cb3e9cb766fd414..9cfa7410526b2e7b3ea7f31a338c74ab86906ac6:/make_ext.pl diff --git a/make_ext.pl b/make_ext.pl index 8270092..9bc4718 100644 --- a/make_ext.pl +++ b/make_ext.pl @@ -204,10 +204,11 @@ elsif (IS_VMS) { { # Cwd needs to be built before Encode recurses into subdirectories. # Pod::Simple needs to be built before Pod::Functions + # lib needs to be built before IO-Compress # This seems to be the simplest way to ensure this ordering: my (@first, @other); foreach (@extspec) { - if ($_ eq 'Cwd' || $_ eq 'Pod/Simple') { + if ($_ eq 'Cwd' || $_ eq 'Pod/Simple' || $_ eq 'lib') { push @first, $_; } else { push @other, $_; @@ -287,7 +288,7 @@ sub build_extension { if (-f $makefile) { $makefile_no_minus_f = 0; - open my $mfh, $makefile or die "Cannot open $makefile: $!"; + open my $mfh, '<', $makefile or die "Cannot open $makefile: $!"; while (<$mfh>) { # Plagiarised from CPAN::Distribution last if /MakeMaker post_initialize section/; @@ -302,7 +303,7 @@ sub build_extension { last unless defined $oldv; require ExtUtils::MM_Unix; defined (my $newv = parse_version MM $vmod) or last; - if ($newv ne $oldv) { + if (version->parse($newv) ne $oldv) { close $mfh or die "close $makefile: $!"; _unlink($makefile); {