]> git.vpit.fr Git - perl/modules/indirect.git/blobdiff - t/11-line.t
Make sure PERL_INDIRECT_PM_DISABLE is not set before running tests
[perl/modules/indirect.git] / t / 11-line.t
index 6832844cc7ff28ee8f3d880ed1a2c1aad361ac6a..3bebba0cc9b218358d9db67f9e50e41db8b387cc 100644 (file)
@@ -5,6 +5,8 @@ use warnings;
 
 use Test::More tests => 3 * 4;
 
+BEGIN { delete $ENV{PERL_INDIRECT_PM_DISABLE} }
+
 sub expect {
  my ($pkg, $line) = @_;
  return qr/^Indirect\s+call\s+of\s+method\s+"new"\s+on\s+object\s+"$pkg"\s+at\s+\(eval\s+\d+\)\s+line\s+$line/;