From: Jarkko Hietaniemi Date: Tue, 8 Jul 2003 19:30:13 +0000 (+0000) Subject: Revert #20077. X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=be17bf04ae90bd9018133c867f86b22ba0016128;p=p5sagit%2Fp5-mst-13.2.git Revert #20077. p4raw-id: //depot/perl@20078 --- diff --git a/lib/CPAN.pm b/lib/CPAN.pm index 558d93b..5d24a18 100644 --- a/lib/CPAN.pm +++ b/lib/CPAN.pm @@ -1668,11 +1668,6 @@ sub _u_r_common { for $module (@expand) { my $file = $module->cpan_file; next unless defined $file; # ?? - # Don't offer to upgrade the core base.pm with the base.pm of - # the Class::Fields. Don't autobundle the core base.pm, either. - # This is a horrible hack but hopefully cases like this are very, - # very rare indeed. - next if $module->id eq 'base' && $file =~ m{/Class-Fields-}; my($latest) = $module->cpan_version; my($inst_file) = $module->inst_file; my($have);