From: Dave Mitchell <davem@fdisolutions.com>
Date: Fri, 26 Mar 2004 18:53:09 +0000 (+0000)
Subject: fix for change #22594; if using test.pl, must tell perl where to
X-Git-Tag: accepted/trunk/20130322.191538~22136
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=0f94e4a979939cb2b1eeb2199cf16a3fe85e8ddb;p=platform%2Fupstream%2Fperl.git

fix for change #22594; if using test.pl, must tell perl where to
find it!
p4raw-link: @22594 on //depot/perl: dfa41748806263fb8b5d5fcb051bd36be96fe93c

p4raw-id: //depot/perl@22596
---

diff --git a/t/comp/hints.t b/t/comp/hints.t
index ce923cc..f00bb6a 100644
--- a/t/comp/hints.t
+++ b/t/comp/hints.t
@@ -2,6 +2,12 @@
 
 # Tests the scoping of $^H and %^H
 
+BEGIN {
+    chdir 't' if -d 't';
+    @INC = qw(. ../lib);
+}
+
+
 BEGIN { print "1..15\n"; }
 BEGIN {
     print "not " if exists $^H{foo};