for my $prereq (sort keys %$prereqs) {
next if $prereq =~ /^perl(?:-|\z)/;
my $obj = $int->module_tree($prereq);
- return $FAIL->('Wrong module object') unless $obj;
+ next unless $obj; # Not in the module tree (e.g. Config)
next if $obj->package_is_perl_core;
{
my $version;
my ($eb_ver) = /\Q$atom\E-v?([\d._pr-]+).*?\.ebuild$/;
return ">=$category/$atom-$ver"
if defined $eb_ver
- and CPANPLUS::Dist::Gentoo::Maps::version_gcmp($eb_ver, $ver) > 0;
+ and CPANPLUS::Dist::Gentoo::Maps::version_gcmp($eb_ver, $ver) >= 0;
}
} else {
return "$category/$atom";