From 88587957d5515b280bc1becf23e9f6520d5dce08 Mon Sep 17 00:00:00 2001
From: Nicholas Clark <nick@ccl4.org>
Date: Sun, 7 Oct 2001 21:53:33 +0100
Subject: & what's to be done for 5.8.0? Message-ID:
 <20011007205333.S38756@plum.flirble.org>

p4raw-id: //depot/perl@12356
---
 lib/FindBin.t | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'lib/FindBin.t')

diff --git a/lib/FindBin.t b/lib/FindBin.t
index d07ce755ca..ebca15b560 100755
--- a/lib/FindBin.t
+++ b/lib/FindBin.t
@@ -1,8 +1,8 @@
 #!./perl
 
 BEGIN {
-    chdir 't' if -d 't';
-    @INC = '../lib';
+    # Can't chdir in BEGIN before FindBin runs, as it then can't find us.
+    @INC = -d 't' ? 'lib' : '../lib';
 }
 
 print "1..1\n";
-- 
cgit v1.2.1