X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=t%2F01-import.t;h=9027e9963135acad44277f60eceb8bfa5ef44d1a;hb=378088097e64037f79bdae71f517be8b4a443929;hp=55f581decb0eef5e953fb0d829c691d0634ad55f;hpb=a336a31d9cdb4fff3b625ccbc5e40b146052e730;p=perl%2Fmodules%2FTest-Leaner.git

diff --git a/t/01-import.t b/t/01-import.t
index 55f581d..9027e99 100644
--- a/t/01-import.t
+++ b/t/01-import.t
@@ -5,9 +5,12 @@ 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 * 14);
+Test::More::plan(tests => 2 * 15);
 
 require Test::Leaner;
 
@@ -20,14 +23,19 @@ my @syms = qw<
  ok
  is
  isnt
- cmp_ok
  like
  unlike
+ cmp_ok
+ is_deeply
  diag
  note
  BAIL_OUT
 >;
 
+unless ($Test::More::VERSION > 0.51) {
+ delete $main::{$_} for @syms;
+}
+
 for (@syms) {
  eval { Test::Leaner->import(import => [ $_ ]) };
  tm_is $@,            '',                          "import $_";