From dbd4d9f56ef7695e7568f79ef26c6e0c6eaeb2bb Mon Sep 17 00:00:00 2001 From: Andreas Koenig Date: Sun, 27 Aug 2017 21:12:15 +0200 Subject: [PATCH] Only upgrade to 2.18, never downgrade or overwrite same version --- bin/makeperl.pl | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/bin/makeperl.pl b/bin/makeperl.pl index 5dde68d7..b839e79b 100755 --- a/bin/makeperl.pl +++ b/bin/makeperl.pl @@ -3,6 +3,7 @@ # use 5.010; use strict; use warnings; +use CPAN::Version; =head1 NAME @@ -439,7 +440,8 @@ if ($Opt{report} || @$m) { $ENV{HARNESS_OPTIONS} = "j".$Opt{jobs} if $Opt{jobs} > 1; if ($Opt{report}) { my @script; - if (1) { # need something like isots(), metacpan() or parse_version() + my $opcv = `$prefix/bin/perl -MCPAN -e print\\\$CPAN::VERSION;`; # other perl cpan version + if (CPAN::Version->vlt($opcv,"2.18")) { push @script, qq{install('ANDK/CPAN-2.18-TRIAL.tar.gz'); die unless CPAN::Shell->expand( -- 2.11.4.GIT