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

[sunnavy at bestpractical.com]

Author: sunnavy
Date: Wed Jan 23 04:34:18 2008
New Revision: 10440

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

Log:
fix

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 04:34:18 2008
@@ -90,8 +90,8 @@
             $source = read_file('Makefile.PL')
               or die "can't read Makefile.PL: $!";
 
-            if ( grep { /use ExtUtils::MakeMaker/ }
-                $source && $self->name ne 'ExtUtils-MakeMaker' )
+            if (   $source =~ /use ExtUtils::MakeMaker/
+                && $self->name ne 'ExtUtils-MakeMaker' )
             {
                 unless ( defined $require->{requires}{'ExtUtils::MakeMaker'}
                     && $require->{requires}{'ExtUtils::MakeMaker'} >= 6.31 )