diff options
| author | Mike Guy <mjtg@cam.ac.uk> | 2000-08-25 16:15:59 +0100 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2000-08-29 02:09:53 +0000 |
| commit | 20822f61cc01ab34be1e17db483aceb9d5ec8fb7 (patch) | |
| tree | e81ff4ef8b435f718d8ca14ebf2df9dbf32a3601 /t/lib/st-freeze.t | |
| parent | 4009639630e1c5aaaff711ab11d5e4837d5bfe2c (diff) | |
| download | perl-20822f61cc01ab34be1e17db483aceb9d5ec8fb7.tar.gz | |
Use minimal @INC in tests, most of the time just '../lib',
so that we simply can't pick up stuff from other Perls than
the one we are testing. Pointed out by
Subject: Re: [PATCH: 6757] make new Storable tests forgiving of places where not built
Message-Id: <E13SKH1-00031D-00@virgo.cus.cam.ac.uk>
p4raw-id: //depot/perl@6874
Diffstat (limited to 't/lib/st-freeze.t')
| -rw-r--r-- | t/lib/st-freeze.t | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/t/lib/st-freeze.t b/t/lib/st-freeze.t index 8dde28f2e1..0b2d1bc763 100644 --- a/t/lib/st-freeze.t +++ b/t/lib/st-freeze.t @@ -14,7 +14,8 @@ sub BEGIN { chdir('t') if -d 't'; - unshift @INC, '../lib'; + @INC = '.'; + push @INC, '../lib'; require Config; import Config; if ($Config{'extensions'} !~ /\bStorable\b/) { print "1..0 # Skip: Storable was not built\n"; |