summaryrefslogtreecommitdiff
path: root/t/pragma/warnings.t
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2001-03-14 21:10:09 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2001-03-14 21:10:09 +0000
commit5da4baf7965da69c0b59c8683d446777cff89c61 (patch)
tree8504c47e0f540dc93c00511ca7727db5cb1a2c7a /t/pragma/warnings.t
parent192cbf1b06bd0b1c75cb42877f87ad6c99aa68e0 (diff)
downloadperl-5da4baf7965da69c0b59c8683d446777cff89c61.tar.gz
The Day of the Retractions continues: the #9138
(integrated in #9144) doesn't work well in mainline. p4raw-id: //depot/perl@9158
Diffstat (limited to 't/pragma/warnings.t')
-rw-r--r--t/pragma/warnings.t1
1 files changed, 1 insertions, 0 deletions
diff --git a/t/pragma/warnings.t b/t/pragma/warnings.t
index e2c7500582..872e6e1417 100644
--- a/t/pragma/warnings.t
+++ b/t/pragma/warnings.t
@@ -5,6 +5,7 @@ BEGIN {
@INC = '../lib';
$ENV{PERL5LIB} = '../lib';
require Config; import Config;
+ $ENV{PERL_DESTRUCT_LEVEL} = 0 unless $ENV{PERL_DESTRUCT_LEVEL} > 3;
}
$| = 1;