Don't try to find a versioned ebuild if the call to version->new() failed

diff --git a/lib/CPANPLUS/Dist/Gentoo.pm b/lib/CPANPLUS/Dist/Gentoo.pm
index 72450d70784f488015170341ff0f948df60a4d87..22059a90b65ce689f5ea391267da16a61c9276b4 100644 (file)
--- a/lib/CPANPLUS/Dist/Gentoo.pm
+++ b/lib/CPANPLUS/Dist/Gentoo.pm
@@ -444,7 +444,7 @@ sub _cpan2portage {
    my @ebuilds = glob catfile($portdir, $category, $atom,"$atom-*.ebuild");
    next unless @ebuilds;
 
-   if (defined $version) {
+   if (defined $ver) { # implies that $version is defined
     for (@ebuilds) {
      next unless /\Q$atom\E-v?([\d._]+).*?\.ebuild$/;
      my $eb_ver = eval { version->new($1) };