Front page | perl.perl5.porters |
Postings from April 2017
[perl #131141] [PATCH] Pull request CPAN-2.18-TRIAL
From:
perlbug-followup
Date:
April 13, 2017 02:43
Subject:
[perl #131141] [PATCH] Pull request CPAN-2.18-TRIAL
Message ID:
rt-4.0.24-3281-1492051357-632.131141-75-0@perl.org
# New Ticket Created by (Andreas J. Koenig)
# Please include the string: [perl #131141]
# in the subject line of all future correspondence about this issue.
# <URL: https://rt.perl.org/Ticket/Display.html?id=131141 >
(Resending article
http://www.nntp.perl.org/group/perl.perl5.porters/2017/04/msg243905.html
with the attachment inline)
From: Andreas Koenig <andreas.koenig.7os6VVqR@franz.ak.mind.de>
To: Mailing list Perl5 <perl5-porters@perl.org>
Subject: Pull request CPAN-2.18-TRIAL
Date: Thu, 06 Apr 2017 21:59:50 +0200
Message-ID: <87r31571e1.fsf@k85.linux.bogus>
CPAN-2.17-TRIAL tried to narrow the scope to the phases prepare, make,
and test, but after some testing evidence took shape that
PERL_USE_UNSAFE_INC=1 is also needed for the install phase.
2.18 provides this change. The second issue fixed in 2.18 addresses
#120781, an ugly bug with a trivial fix.
All tests are green at the time of this writing:
http://matrix.cpantesters.org/?dist=CPAN%202.18-TRIAL
Sorry for the inconvenience and the long time it took to understand the
issue.
Thanks,
--
andreas
>From 4b80c704ab47019f8406d2a7fe2916511dc15405 Mon Sep 17 00:00:00 2001
From: Andreas Koenig <root@dubravka.in-berlin.de>
Date: Thu, 6 Apr 2017 19:30:45 +0000
Subject: [PATCH] Updates CPAN.pm to ANDK/CPAN-2.18-TRIAL.tar.gz
---
Porting/Maintainers.pl | 2 +-
cpan/CPAN/lib/CPAN.pm | 2 +-
cpan/CPAN/lib/CPAN/Bundle.pm | 7 ++++++-
cpan/CPAN/lib/CPAN/Distribution.pm | 4 ++--
4 files changed, 10 insertions(+), 5 deletions(-)
diff --git a/Porting/Maintainers.pl b/Porting/Maintainers.pl
index 0037f8be6f..33df630b78 100755
--- a/Porting/Maintainers.pl
+++ b/Porting/Maintainers.pl
@@ -247,7 +247,7 @@ use File::Glob qw(:case);
},
'CPAN' => {
- 'DISTRIBUTION' => 'ANDK/CPAN-2.17-TRIAL2.tar.gz',
+ 'DISTRIBUTION' => 'ANDK/CPAN-2.18-TRIAL.tar.gz',
'FILES' => q[cpan/CPAN],
'EXCLUDED' => [
qr{^distroprefs/},
diff --git a/cpan/CPAN/lib/CPAN.pm b/cpan/CPAN/lib/CPAN.pm
index 185ade9095..4f028505f8 100644
--- a/cpan/CPAN/lib/CPAN.pm
+++ b/cpan/CPAN/lib/CPAN.pm
@@ -2,7 +2,7 @@
# vim: ts=4 sts=4 sw=4:
use strict;
package CPAN;
-$CPAN::VERSION = '2.17';
+$CPAN::VERSION = '2.18';
$CPAN::VERSION =~ s/_//;
# we need to run chdir all over and we would get at wrong libraries
diff --git a/cpan/CPAN/lib/CPAN/Bundle.pm b/cpan/CPAN/lib/CPAN/Bundle.pm
index 3f17b540dd..3b4e93d8bf 100644
--- a/cpan/CPAN/lib/CPAN/Bundle.pm
+++ b/cpan/CPAN/lib/CPAN/Bundle.pm
@@ -8,7 +8,7 @@ use CPAN::Module;
use vars qw(
$VERSION
);
-$VERSION = "5.5002";
+$VERSION = "5.5003";
sub look {
my $self = shift;
@@ -21,6 +21,11 @@ sub undelay {
delete $self->{later};
for my $c ( $self->contains ) {
my $obj = CPAN::Shell->expandany($c) or next;
+ if ($obj->id eq $self->id){
+ my $id = $obj->id;
+ $CPAN::Frontend->mywarn("$id seems to contain itself, skipping\n");
+ next;
+ }
$obj->undelay;
}
}
diff --git a/cpan/CPAN/lib/CPAN/Distribution.pm b/cpan/CPAN/lib/CPAN/Distribution.pm
index fc7ce10f7b..64976eb7bb 100644
--- a/cpan/CPAN/lib/CPAN/Distribution.pm
+++ b/cpan/CPAN/lib/CPAN/Distribution.pm
@@ -8,7 +8,7 @@ use CPAN::InfoObj;
use File::Path ();
@CPAN::Distribution::ISA = qw(CPAN::InfoObj);
use vars qw($VERSION);
-$VERSION = "2.17";
+$VERSION = "2.18";
# no prepare, because prepare is not a command on the shell command line
# TODO: clear instance cache on reload
@@ -3960,7 +3960,7 @@ sub install {
: ($ENV{PERLLIB} || "");
local $ENV{PERL5OPT} = defined $ENV{PERL5OPT} ? $ENV{PERL5OPT} : "";
- # local $ENV{PERL_USE_UNSAFE_INC} = exists $ENV{PERL_USE_UNSAFE_INC} ? $ENV{PERL_USE_UNSAFE_INC} : 1; # install
+ local $ENV{PERL_USE_UNSAFE_INC} = exists $ENV{PERL_USE_UNSAFE_INC} ? $ENV{PERL_USE_UNSAFE_INC} : 1; # install
$CPAN::META->set_perl5lib;
local $ENV{PERL_MM_USE_DEFAULT} = 1 if $CPAN::Config->{use_prompt_default};
local $ENV{NONINTERACTIVE_TESTING} = 1 if $CPAN::Config->{use_prompt_default};
--
2.11.0
-
[perl #131141] [PATCH] Pull request CPAN-2.18-TRIAL
by perlbug-followup