diff options
| author | Nicholas Clark <nick@ccl4.org> | 2002-05-17 23:43:35 +0100 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-05-17 21:39:37 +0000 |
| commit | 372cb964568e2238562bfbc998d3099655f1c939 (patch) | |
| tree | 3b3b414750160d6eb75b8f2662acd35eec999bab /ext/Storable/t/downgrade.t | |
| parent | 57b1a898feef90fc19df54256136c678f3487b9a (diff) | |
| download | perl-372cb964568e2238562bfbc998d3099655f1c939.tar.gz | |
Storable stand alone tests
Message-ID: <20020517214334.GG290@Bagpuss.unfortu.net>
p4raw-id: //depot/perl@16664
Diffstat (limited to 'ext/Storable/t/downgrade.t')
| -rw-r--r-- | ext/Storable/t/downgrade.t | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/ext/Storable/t/downgrade.t b/ext/Storable/t/downgrade.t index b560508eed..6e6935da3b 100644 --- a/ext/Storable/t/downgrade.t +++ b/ext/Storable/t/downgrade.t @@ -16,15 +16,15 @@ sub BEGIN { if ($ENV{PERL_CORE}){ chdir('t') if -d 't'; - @INC = '.'; - push @INC, '../lib'; + @INC = ('.', '../lib'); + } else { + unshift @INC, 't'; } require Config; import Config; if ($ENV{PERL_CORE} and $Config{'extensions'} !~ /\bStorable\b/) { print "1..0 # Skip: Storable was not built\n"; exit 0; } - # require 'lib/st-dump.pl'; } use Test::More; |