From: David Golden <dagolden@cpan.org>
Date: Fri, 10 Dec 2010 14:26:43 +0000 (-0500)
Subject: Fix up some comments about version manipulation
X-Git-Tag: release_1.0.2~3
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=d880ef1f1d4477157d7432bfd60c7ee330eb224e;p=p5sagit%2FModule-Metadata.git

Fix up some comments about version manipulation
---

diff --git a/lib/Module/Metadata.pm b/lib/Module/Metadata.pm
index f292114..9bda2df 100644
--- a/lib/Module/Metadata.pm
+++ b/lib/Module/Metadata.pm
@@ -543,7 +543,7 @@ sub _evaluate_version_line {
     if $@;
 
   # Activestate apparently creates custom versions like '1.23_45_01', which
-  # cause M::B::Version to think it's an invalid alpha.  So check for that
+  # cause version.pm to think it's an invalid alpha.  So check for that
   # and strip them
   my $num_dots = () = $result =~ m{\.}g;
   my $num_unders = () = $result =~ m{_}g;
@@ -551,7 +551,7 @@ sub _evaluate_version_line {
     $result =~ s{_}{}g;
   }
 
-  # Bless it into our own version class
+  # Upgrade it into a version object
   eval { $result = version->new($result) };
   die "Version '$result' from $self->{filename} does not appear to be valid:\n$eval\n\nThe fatal error was: $@\n"
     if $@;