various small tweaks (still fails a few taint tests in {taint,locale}.t)

[p5sagit/p5-mst-13.2.git] / t / lib / fields.t

diff --git a/t/lib/fields.t b/t/lib/fields.t
index 7fad5d7..fe6ed18 100755 (executable)
--- a/t/lib/fields.t
+++ b/t/lib/fields.t
@@ -6,6 +6,8 @@ use vars qw($DEBUG);
 my $w;
 
 BEGIN {
+   chdir 't' if -d 't';
+   @INC = '../lib' if -d '../lib';
    $SIG{__WARN__} = sub {
        if ($_[0] =~ /^Hides field 'b1' in base class/) {
            $w++;