=head2 C<PERL_TEST_LEANER_USES_TEST_MORE>
If this environment variable is set, L<Test::Leaner> will replace its functions by those from L<Test::More>.
-Moreover, the symbols that are imported you C<use Test::Leaner> will be those from L<Test::More>, but you can still only import the symbols originally defined in L<Test::Leaner> (hence the functions from L<Test::More> that are not implemented in L<Test::Leaner> will not be imported).
+Moreover, the symbols that are imported when you C<use Test::Leaner> will be those from L<Test::More>, but you can still only import the symbols originally defined in L<Test::Leaner> (hence the functions from L<Test::More> that are not implemented in L<Test::Leaner> will not be imported).
If your version of L<Test::More> is too old and doesn't have some symbols (like L</note> or L</done_testing>), they will be replaced in L<Test::Leaner> by croaking stubs.
This may be useful if your L<Test::Leaner>-based test script fails and you want extra diagnostics.
my $import = sub {
shift;
+
my @imports = &_handle_import_args;
@imports = @EXPORT unless @imports;
my @test_more_imports;
*{$pkg."::$_"} = $leaner_stash->{$_};
}
}
+
my $test_more_import = 'Test::More'->can('import');
+ return unless $test_more_import;
+
@_ = (
'Test::More',
@_,
lock $plan if THREADSAFE;
push @_, 'no_diag' if $no_diag;
}
+
goto $test_more_import;
};