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

[? sunnavy]

The branch, master has been updated
       via  a259bc515a7a181e1b3b04797d23bf84d912a054 (commit)
      from  b896d59db5d7029f3eb07bfff250b72408849181 (commit)

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

- Log -----------------------------------------------------------------
commit a259bc515a7a181e1b3b04797d23bf84d912a054
Author: sunnavy <sunnavy at bestpractical.com>
Date:   Sat May 14 10:32:10 2011 +0800

    incase user set --require-yml to META.yml directly

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

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