develooper Front page | perl.perl5.porters | Postings from July 2010

Re: Smoke [5.13.2] v5.13.2-131-gf507d6f FAIL(F) MSWin32 Win2000 SP4(x86/1 cpu)

Thread Previous | Thread Next
From:
George Greer
Date:
July 3, 2010 19:06
Subject:
Re: Smoke [5.13.2] v5.13.2-131-gf507d6f FAIL(F) MSWin32 Win2000 SP4(x86/1 cpu)
Message ID:
alpine.LFD.2.00.1007032041400.11047@ein.m-l.org
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.4


Thread Previous | Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About