File tree Expand file tree Collapse file tree 1 file changed +7
-0
lines changed Expand file tree Collapse file tree 1 file changed +7
-0
lines changed Original file line number Diff line number Diff line change @@ -2646,6 +2646,12 @@ sub follow_prereqs {
26462646 my (@good_prereq_tuples );
26472647 for my $p (@prereq_tuples ) {
26482648 # e.g. $p = ['Devel::PartialDump', 'r', 1]
2649+ # skip builtins without .pm
2650+ if ($Config::Config {usecperl }
2651+ and $p -> [0] =~ / ^(DynaLoader|XSLoader|strict|coretypes)$ / ) {
2652+ CPAN-> debug(" $p ->[0] builtin" ) if $CPAN::DEBUG ;
2653+ next ;
2654+ }
26492655 # promote if possible
26502656 if ($p -> [1] =~ / ^(r|c)$ / ) {
26512657 push @good_prereq_tuples , $p ;
@@ -2660,6 +2666,7 @@ sub follow_prereqs {
26602666 die " Panic: in follow_prereqs: reqtype[$p ->[1]] seen, should never happen" ;
26612667 }
26622668 }
2669+ return unless @good_prereq_tuples ;
26632670 my $pretty_id = $self -> pretty_id;
26642671 my %map = (
26652672 b => " build_requires" ,
You can’t perform that action at this time.
0 commit comments