From 58495aaee931590af5a96c0284cbd3167dc2a3f0 Mon Sep 17 00:00:00 2001
From: "zach%zachlipton.com" <>
Date: Tue, 4 Sep 2001 00:58:53 +0000
Subject: Fix for bug 98024: t/1.t should use $^X instead of hard-coded path to
 perl.

Patch by ddkilzer@theracingworld.com (David D. Kilzer, ddk). Review by Zach Lipton (zach@zachlipton.com) no 2nd review required.
---
 t/1.t | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 't')

diff --git a/t/1.t b/t/1.t
index 39cdc9a15..7e46dd49c 100644
--- a/t/1.t
+++ b/t/1.t
@@ -100,7 +100,7 @@ xml.cgi #51
 ));
 our $warnings;
 my $verbose = $::ENV{VERBOSE};
-$perlapp='/usr/bonsaitools/bin/perl';
+$perlapp=$^X;
 foreach $file (@testitems) {
         $file =~ s/\s.*$//; # nuke everything after the first space (#comment)
         next if (!$file); # skip null entries
-- 
cgit v1.2.3-24-g4f1b