]> git.vpit.fr Git - perl/modules/CPANPLUS-Dist-Gentoo.git/commitdiff
C::D::G::Maps::version_c2g ought to return undef for undef
authorVincent Pit <vince@profvince.com>
Fri, 27 Nov 2009 16:15:01 +0000 (17:15 +0100)
committerVincent Pit <vince@profvince.com>
Fri, 27 Nov 2009 16:15:01 +0000 (17:15 +0100)
lib/CPANPLUS/Dist/Gentoo/Maps.pm

index d4a3fe6fae239eb28f0c62b7840629bac6c61302..3365a0f7c38222e845d092019176b09163cfb2ce 100644 (file)
@@ -79,6 +79,8 @@ Converts a CPAN version to a Gentoo version.
 sub version_c2g {
  my ($v) = @_;
 
+ return unless defined $v;
+
  $v =~ y/-/_/;
  $v =~ y/0-9._//cd;