[Bps-public-commit] Shipwright branch, master, updated. 5b65eefbf426b9dd8a70bfc05fcecad0cd0dd47a

[? sunnavy]

The branch, master has been updated
       via  5b65eefbf426b9dd8a70bfc05fcecad0cd0dd47a (commit)
      from  aaec9365f3b34f7e5f968f9c3045fd15fb548d72 (commit)

Summary of changes:
 lib/Shipwright/Source/Base.pm |    2 +-
 1 files changed, 1 insertions(+), 1 deletions(-)

- Log -----------------------------------------------------------------
commit 5b65eefbf426b9dd8a70bfc05fcecad0cd0dd47a
Author: sunnavy <sunnavy at bestpractical.com>
Date:   Sun Apr 11 00:46:49 2010 +0800

    warning fix

diff --git a/lib/Shipwright/Source/Base.pm b/lib/Shipwright/Source/Base.pm
index d932433..7b292a8 100644
--- a/lib/Shipwright/Source/Base.pm
+++ b/lib/Shipwright/Source/Base.pm
@@ -428,7 +428,7 @@ EOF
                     next;
                 }
 
-                my $version = $require->{$type}{$module}{version};
+                my $version = $require->{$type}{$module}{version} || 0;
                 $version =~ s!^\D+!!; # some may contain '>' or '>=' 
                 if ( !$self->include_dual_lifed 
                     && Module::CoreList->first_release( $module, $version )

-----------------------------------------------------------------------