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 (file)
--- 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};