diff options
| author | Dave Mitchell <davem@fdisolutions.com> | 2003-07-02 19:10:45 +0100 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2003-07-02 20:10:47 +0000 |
| commit | 127212b23933541d95e57814dfd91e6456b50ddd (patch) | |
| tree | 0b17f86ddd0b52102984b3ffb889a163e6cbaeec /t | |
| parent | 80bca1b464a2919ae4e20b8134207641e7b75d04 (diff) | |
| download | perl-127212b23933541d95e57814dfd91e6456b50ddd.tar.gz | |
various Deparse fixes
Message-ID: <20030702171045.GF2137@fdgroup.com>
p4raw-id: //depot/perl@19939
Diffstat (limited to 't')
| -rwxr-xr-x | t/TEST | 2 | ||||
| -rwxr-xr-x | t/op/ord.t | 2 |
2 files changed, 2 insertions, 2 deletions
@@ -228,7 +228,7 @@ EOT my $testswitch = '-I. -MTestInit'; # -T will strict . from @INC if ($type eq 'deparse') { my $deparse = - "./perl $testswitch $switch -I../lib -MO=-qq,Deparse,". + "./perl $testswitch $switch -I../lib -MO=-qq,Deparse,-sv1.,". "-l$deparse_opts$file_opts ". "$test > $test.dp ". "&& ./perl $testswitch $switch -I../lib $test.dp |"; diff --git a/t/op/ord.t b/t/op/ord.t index ff51c18f8c..455666417f 100755 --- a/t/op/ord.t +++ b/t/op/ord.t @@ -2,7 +2,7 @@ BEGIN { chdir 't' if -d 't'; - @INC = qw(.); + @INC = qw(. ../lib); # ../lib needed for test.deparse require "test.pl"; } |