Author: dagolden
Date: Fri Aug 7 18:22:08 2009
New Revision: 13175
Modified:
Module-Build/trunk/Changes
Module-Build/trunk/t/debug.t
Log:
Fixed failing debug.t on VMS (RT#48362)
Modified: Module-Build/trunk/Changes
==============================================================================
--- Module-Build/trunk/Changes (original)
+++ Module-Build/trunk/Changes Fri Aug 7 18:22:08 2009
@@ -4,6 +4,7 @@
Bug fixes:
- Fixed failing xs.t if /tmp is mounted noexec (RT#47331) [David Golden]
+ - Fixed failing debug.t on VMS (RT#48362) [Craig Berry]
0.34_02 - Sun Jul 26 22:50:40 EDT 2009
Modified: Module-Build/trunk/t/debug.t
==============================================================================
--- Module-Build/trunk/t/debug.t (original)
+++ Module-Build/trunk/t/debug.t Fri Aug 7 18:22:08 2009
@@ -24,8 +24,9 @@
$output = stdout_of sub {
Module::Build->run_perl_script('Build.PL', [], [])
};
+ my $build_script = $^O eq 'VMS' ? 'Build.com' : 'Build';
$output = stdout_of sub {
- Module::Build->run_perl_script('Build', [], ['--debug'])
+ Module::Build->run_perl_script($build_script, [], ['--debug'])
};
like($output, '/Starting ACTION_build.*?Starting ACTION_code.*?Finished
ACTION_code.*?Finished ACTION_build/ms',
"found nested ACTION_* debug statements"
