diff options
| author | Nicholas Clark <nick@ccl4.org> | 2007-01-09 12:31:17 +0000 |
|---|---|---|
| committer | Steve Hay <SteveHay@planit.com> | 2007-01-09 12:44:15 +0000 |
| commit | cc97bb9e08974d3aba0c2bf61277f68eea5a2a6a (patch) | |
| tree | ef94640a70211e4ef2129f280b876d12bf8577c5 /t/op | |
| parent | 3e5d884e5e81bd159a2ce21ddb0962337e7bbd90 (diff) | |
| download | perl-cc97bb9e08974d3aba0c2bf61277f68eea5a2a6a.tar.gz | |
Re: Change 29723 breaks t/op/inccode-tie.t on Win32
Message-ID: <20070109123116.GC30742@plum.flirble.org>
p4raw-id: //depot/perl@29734
Diffstat (limited to 't/op')
| -rw-r--r-- | t/op/inccode-tie.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/op/inccode-tie.t b/t/op/inccode-tie.t index 7f11004f94..5bbcc101a3 100644 --- a/t/op/inccode-tie.t +++ b/t/op/inccode-tie.t @@ -8,7 +8,7 @@ tie @INC, 'Tie::StdArray'; @INC = @orig_INC; for my $file ('./op/inccode.t', './t/op/inccode.t', ':op:inccode.t') { if (-r $file) { - do $file or die $@; + do $file; die $@ if $@; exit; } } |