Report the correct line in import argument tests

[perl/modules/Test-Leaner.git] / t / 02-import-arg.t

diff --git a/t/02-import-arg.t b/t/02-import-arg.t
index 71dc90c950372b5753ae996c9a236706a75450a0..d2181d23aa093fb0532f600560b43d02718d5f9a 100644 (file)
--- a/t/02-import-arg.t
+++ b/t/02-import-arg.t
@@ -38,6 +38,7 @@ my @default_exports = qw<
 >;
 
 sub check_imports {
+ local $Test::Builder::Level = ($Test::Builder::Level || 0) + 1;
  my %imported     = map { $_ => 1 } @{ $_[0] || [] };
  my @not_imported = @{ $_[1] || [] };
  for (@not_imported, grep !$imported{$_}, @default_exports) {