X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FTest-Leaner.git;a=blobdiff_plain;f=t%2F02-import-arg.t;h=d2181d23aa093fb0532f600560b43d02718d5f9a;hp=71dc90c950372b5753ae996c9a236706a75450a0;hb=a615878a77fd5a9ae493272815373f1641cb951b;hpb=d8f274f085e5af023435df3abc2d0671f539e627 diff --git a/t/02-import-arg.t b/t/02-import-arg.t index 71dc90c..d2181d2 100644 --- 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) {