From 8ed8cbb86a646614a2f538937d1e34784e6509f9 Mon Sep 17 00:00:00 2001 From: George Greer <perl@greerga.m-l.org> Date: Sun, 4 Jul 2010 13:09:56 -0400 Subject: [PATCH] Make Test::Harness source_handler.t use the build perl (%PERL_CORE%) on Win32. --- cpan/Test-Harness/t/source_tests/psql.bat | 6 ++++-- 1 files changed, 4 insertions(+), 2 deletions(-) diff --git a/cpan/Test-Harness/t/source_tests/psql.bat b/cpan/Test-Harness/t/source_tests/psql.bat index 29daf61..8f43ddd 100755 --- a/cpan/Test-Harness/t/source_tests/psql.bat +++ b/cpan/Test-Harness/t/source_tests/psql.bat @@ -1,10 +1,12 @@ @rem = '--*-Perl-*-- @echo off +if (%PERL_CORE%)==() set PERL_CORE=perl +if not exist %PERL_CORE% set PERL_CORE=perl if "%OS%" == "Windows_NT" goto WinNT -perl -x -S "%0" %1 %2 %3 %4 %5 %6 %7 %8 %9 +%PERL_CORE% -x -S "%0" %1 %2 %3 %4 %5 %6 %7 %8 %9 goto endofperl :WinNT -perl -x -S %0 %* +%PERL_CORE% -x -S %0 %* if NOT "%COMSPEC%" == "%SystemRoot%\system32\cmd.exe" goto endofperl if %errorlevel% == 9009 echo You do not have Perl in your PATH. if errorlevel 1 goto script_failed_so_exit_with_non_zero_val 2>nul -- 1.7.0.4Thread Previous | Thread Next