Make sure PERL_INDIRECT_PM_DISABLE is not set before running tests

[perl/modules/indirect.git] / t / 10-args.t

diff --git a/t/10-args.t b/t/10-args.t
index d7352955b295e46478be1e971a951d0711639e0c..4037c60eb95231591255b08f4c613dfc46b64018 100644 (file)
--- a/t/10-args.t
+++ b/t/10-args.t
@@ -5,6 +5,8 @@ use warnings;
 
 use Test::More tests => 4 + 1 + 1;
 
+BEGIN { delete $ENV{PERL_INDIRECT_PM_DISABLE} }
+
 sub expect {
  my ($pkg) = @_;
  qr/^Indirect call of method "new" on object "$pkg" at \(eval \d+\) line \d+/;