[svn:Module-Build] r12721 - in Module-Build/trunk: . lib/Module/Build

Author: dagolden
Date: Tue Apr 28 07:10:21 2009
New Revision: 12721

Modified:
   Module-Build/trunk/Changes
   Module-Build/trunk/lib/Module/Build/Compat.pm

Log:
Fixed RT#45462: Compat.pm needs to reference 'Build.com' on VMS


Modified: Module-Build/trunk/Changes
==============================================================================
--- Module-Build/trunk/Changes	(original)
+++ Module-Build/trunk/Changes	Tue Apr 28 07:10:21 2009
@@ -3,6 +3,8 @@
 0.32_02 - 
 
  Bug-fixes:
+ - Fixed RT#45462: Compat.pm needs to reference 'Build.com' on VMS
+   [patch from John Malmberg]
  - Fixed RT#45461: ext.t on VMS [patch from John Malmberg]
  - Fixed RT#43861: Module::Build::PPMMaker has broken PPD name
    versioning for v5.10+

Modified: Module-Build/trunk/lib/Module/Build/Compat.pm
==============================================================================
--- Module-Build/trunk/lib/Module/Build/Compat.pm	(original)
+++ Module-Build/trunk/lib/Module/Build/Compat.pm	Tue Apr 28 07:10:21 2009
@@ -143,7 +143,9 @@
     eval "use Module::Build::Compat 0.02; 1" or die $@;
     %s
     Module::Build::Compat->run_build_pl(args => \@ARGV);
-    exit(0) unless(-e 'Build'); # cpantesters convention
+    my $build_script = 'Build';  
+    $build_script .= '.com' if $^O eq 'VMS';
+    exit(0) unless(-e $build_script); # cpantesters convention
     require %s;
     Module::Build::Compat->write_makefile(build_class => '%s');
 EOF