X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=t%2F01-import.t;h=9027e9963135acad44277f60eceb8bfa5ef44d1a;hb=378088097e64037f79bdae71f517be8b4a443929;hp=3b42068d7fb9cb90ba3775bc76015583df607ed0;hpb=465440ff9c9519d5ce33d582cbf3fa4d03b4358a;p=perl%2Fmodules%2FTest-Leaner.git diff --git a/t/01-import.t b/t/01-import.t index 3b42068..9027e99 100644 --- a/t/01-import.t +++ b/t/01-import.t @@ -5,7 +5,10 @@ use warnings; use Test::More (); -BEGIN { *tm_is = \&Test::More::is } +BEGIN { + delete $ENV{PERL_TEST_LEANER_USES_TEST_MORE}; + *tm_is = \&Test::More::is; +} Test::More::plan(tests => 2 * 15); @@ -29,6 +32,10 @@ my @syms = qw< BAIL_OUT >; +unless ($Test::More::VERSION > 0.51) { + delete $main::{$_} for @syms; +} + for (@syms) { eval { Test::Leaner->import(import => [ $_ ]) }; tm_is $@, '', "import $_";