Change 28587 by [EMAIL PROTECTED] on 2006/07/16 15:40:29

        Upgrade to Module-Build-0.2803

Affected files ...

... //depot/perl/lib/Module/Build.pm#7 edit
... //depot/perl/lib/Module/Build/Base.pm#7 edit
... //depot/perl/lib/Module/Build/Changes#7 edit

Differences ...

==== //depot/perl/lib/Module/Build.pm#7 (text) ====
Index: perl/lib/Module/Build.pm
--- perl/lib/Module/Build.pm#6~28579~   2006-07-15 07:46:53.000000000 -0700
+++ perl/lib/Module/Build.pm    2006-07-16 08:40:29.000000000 -0700
@@ -15,7 +15,7 @@
 
 use vars qw($VERSION @ISA);
 @ISA = qw(Module::Build::Base);
-$VERSION = '0.2802';
+$VERSION = '0.2803';
 $VERSION = eval $VERSION;
 
 # Okay, this is the brute-force method of finding out what kind of

==== //depot/perl/lib/Module/Build/Base.pm#7 (text) ====
Index: perl/lib/Module/Build/Base.pm
--- perl/lib/Module/Build/Base.pm#6~28579~      2006-07-15 07:46:53.000000000 
-0700
+++ perl/lib/Module/Build/Base.pm       2006-07-16 08:40:29.000000000 -0700
@@ -3211,6 +3211,8 @@
     die "ERROR: Missing required field '$_' for META.yml\n"
       unless defined($node->{$name}) && length($node->{$name});
   }
+  # Really don't understand why I need the "... if exists" here
+  $node->{version} = $node->{version}->stringify if exists $node->{version};
 
   if (defined( $self->license ) &&
       defined( my $url = $self->valid_licenses->{ $self->license } )) {
@@ -3228,7 +3230,7 @@
   }
   my $pkgs = eval { $self->find_dist_packages };
   if ($@) {
-    $self->log_warn("WARNING: Possible missing or corrupt 'MANIFEST' file.\n" .
+    $self->log_warn("[EMAIL PROTECTED]: Possible missing or corrupt 'MANIFEST' 
file.\n" .
                    "Nothing to enter for 'provides' field in META.yml\n");
   } else {
     $node->{provides} = $pkgs if %$pkgs;
@@ -3379,6 +3381,11 @@
     }
   }
 
+  # Stringify versions
+  for (grep exists $_->{version}, values %prime) {
+    $_->{version} = $_->{version}->stringify;
+  }
+
   return \%prime;
 }
 

==== //depot/perl/lib/Module/Build/Changes#7 (text) ====
Index: perl/lib/Module/Build/Changes
--- perl/lib/Module/Build/Changes#6~28579~      2006-07-15 07:46:53.000000000 
-0700
+++ perl/lib/Module/Build/Changes       2006-07-16 08:40:29.000000000 -0700
@@ -1,5 +1,10 @@
 Revision history for Perl extension Module::Build.
 
+0.2803  Sat Jul 15 08:26:34 CDT 2006
+
+ - The META.yml file in the last release was all screwed up, so the
+   distribution wasn't indexed properly.  Fixed in this release.
+
 0.2802  Fri Jul 14 22:40:34 CDT 2006
 
  - Added reliance on version.pm, which means we should deal much
End of Patch.

Reply via email to