[Bps-public-commit] r10445 - bpsbuilder/Shipwright/lib/Shipwright/Source

sunnavy at bestpractical.com sunnavy at bestpractical.com
Wed Jan 23 09:17:42 EST 2008


Author: sunnavy
Date: Wed Jan 23 09:17:42 2008
New Revision: 10445

Modified:
   bpsbuilder/Shipwright/lib/Shipwright/Source/Base.pm

Log:
looser check for build module

Modified: bpsbuilder/Shipwright/lib/Shipwright/Source/Base.pm
==============================================================================
--- bpsbuilder/Shipwright/lib/Shipwright/Source/Base.pm	(original)
+++ bpsbuilder/Shipwright/lib/Shipwright/Source/Base.pm	Wed Jan 23 09:17:42 2008
@@ -64,8 +64,7 @@
 
             $source = read_file( File::Spec->catfile('Build.PL') )
               or die "can't read Build.PL: $!";
-            if (   $source =~ /use Module::Build/
-                && $self->name ne 'Module-Build' )
+            if ( $source =~ /Module::Build/ && $self->name ne 'Module-Build' )
             {
                 unless ( $require->{build_requires}{'Module::Build'} ) {
                     $require->{build_requires} = { 'Module::Build' => 0 };
@@ -90,7 +89,7 @@
             $source = read_file('Makefile.PL')
               or die "can't read Makefile.PL: $!";
 
-            if (   $source =~ /use ExtUtils::MakeMaker/
+            if (   $source =~ /ExtUtils::/
                 && $self->name ne 'ExtUtils-MakeMaker' )
             {
                 unless ( defined $require->{requires}{'ExtUtils::MakeMaker'}



More information about the Bps-public-commit mailing list