- my $last = reduce { $a->[1] < $b->[1] ? $b : $a }
- map [ $_, CPANPLUS::Dist::Gentoo::Atom->new(ebuild => $_) ],
- @ebuilds;
-
- my $dep;
- if (defined $ver) { # implies that $version is defined
- next if $last < $ver;
- $dep = ">=$category/$atom-$ver";
- } else {
- $dep = "$category/$atom";
- }
+ my $atom = reduce { $a < $b ? $b : $a } # handles overloading
+ map CPANPLUS::Dist::Gentoo::Atom->new(
+ ebuild => $_,
+ minimum => 1,
+ ), @ebuilds;
+ next if defined $ver and $atom < $ver;