Make sure PERL_INDIRECT_PM_DISABLE is not set before running tests

[perl/modules/indirect.git] / t / 21-bad.t

diff --git a/t/21-bad.t b/t/21-bad.t
index 6852426a69e536872c7571929d4315bd3ea3736d..f4231d72ae1517d3a23fd2c7e1f3186c8ff35126 100644 (file)
--- a/t/21-bad.t
+++ b/t/21-bad.t
@@ -17,6 +17,8 @@ BEGIN {
 
 use Test::More tests => 3 * (4 * $tests + $reports) + 4;
 
+BEGIN { delete $ENV{PERL_INDIRECT_PM_DISABLE} }
+
 my ($obj, $x);
 our ($y, $bloop);