From: Vincent Pit <vince@profvince.com>
Date: Sun, 1 Feb 2009 00:23:38 +0000 (+0100)
Subject: Don't try to look for a version if none was passed to _cpan2portage
X-Git-Tag: v0.06~3
X-Git-Url: http://git.vpit.fr/?a=commitdiff_plain;h=0ffdc6d6358811884761fcae760fe1d84012dca6;p=perl%2Fmodules%2FCPANPLUS-Dist-Gentoo.git

Don't try to look for a version if none was passed to _cpan2portage
---

diff --git a/lib/CPANPLUS/Dist/Gentoo.pm b/lib/CPANPLUS/Dist/Gentoo.pm
index dc35d0b..c238064 100644
--- a/lib/CPANPLUS/Dist/Gentoo.pm
+++ b/lib/CPANPLUS/Dist/Gentoo.pm
@@ -365,10 +365,11 @@ sub create {
 }
 
 sub _cpan2portage {
- my ($self, $name, $ver) = @_;
+ my ($self, $name, $version) = @_;
 
  $name = CPANPLUS::Dist::Gentoo::Maps::name_c2g($name);
- $ver  = CPANPLUS::Dist::Gentoo::Maps::version_c2g($ver);
+ my $ver;
+ $ver = CPANPLUS::Dist::Gentoo::Maps::version_c2g($version) if defined $version;
 
  my @portdirs = ($main_portdir, @{$self->status->portdir_overlay});