Author: kwilliams
Date: Sat Jul 15 13:28:00 2006
New Revision: 6656
Modified:
Module-Build/trunk/lib/Module/Build/Base.pm
Log:
Fix a t/metadata.t failure
Modified: Module-Build/trunk/lib/Module/Build/Base.pm
==============================================================================
--- Module-Build/trunk/lib/Module/Build/Base.pm (original)
+++ Module-Build/trunk/lib/Module/Build/Base.pm Sat Jul 15 13:28:00 2006
@@ -3211,7 +3211,8 @@
die "ERROR: Missing required field '$_' for META.yml\n"
unless defined($node->{$name}) && length($node->{$name});
}
- $node->{version} = $node->{version}->stringify;
+ # 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 } )) {
