Make sure PERL_INDIRECT_PM_DISABLE is not set before running tests

[perl/modules/indirect.git] / t / 30-scope.t

diff --git a/t/30-scope.t b/t/30-scope.t
index 14b987cb17de043947003fce4d9a0d9dc85374cb..78b2b1dad86ba8fcfbe8e881f06ad79401cdec19 100644 (file)
--- a/t/30-scope.t
+++ b/t/30-scope.t
@@ -8,6 +8,8 @@ BEGIN { $tests = 18 }
 
 use Test::More tests => (1 + $tests + 1) + 3 + 3 + 3 + 5 + 1;
 
+BEGIN { delete $ENV{PERL_INDIRECT_PM_DISABLE} }
+
 use lib 't/lib';
 
 my %wrong = map { $_ => 1 } 2, 3, 5, 7, 9, 10, 14, 15, 17, 18;