From 435bc96e1f4b5bd13c123de1fa33289a855741d0 Mon Sep 17 00:00:00 2001 From: George Greer <perl@greerga.m-l.org> Date: Sat, 3 Jul 2010 22:02:04 -0400 Subject: [PATCH] Make Test::Harness source_handler.t use the build perl on Win32. --- cpan/Test-Harness/t/source_tests/psql.bat | 5 +++-- 1 files changed, 3 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..c5472b8 100755 --- a/cpan/Test-Harness/t/source_tests/psql.bat +++ b/cpan/Test-Harness/t/source_tests/psql.bat @@ -1,10 +1,11 @@ @rem = '--*-Perl-*-- @echo off +if exist ..\..\perl.exe set PERLPATH=..\..\ if "%OS%" == "Windows_NT" goto WinNT -perl -x -S "%0" %1 %2 %3 %4 %5 %6 %7 %8 %9 +%PERLPATH%perl -x -S "%0" %1 %2 %3 %4 %5 %6 %7 %8 %9 goto endofperl :WinNT -perl -x -S %0 %* +%PERLPATH%perl -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