X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FTest-Leaner.git;a=blobdiff_plain;f=t%2F01-import.t;h=35c8d5ca6469819d8004e886f9ce8f59a88ccf21;hp=9027e9963135acad44277f60eceb8bfa5ef44d1a;hb=dee850ba2915663035bfd2b27b2d412e370f4a26;hpb=378088097e64037f79bdae71f517be8b4a443929 diff --git a/t/01-import.t b/t/01-import.t index 9027e99..35c8d5c 100644 --- a/t/01-import.t +++ b/t/01-import.t @@ -38,6 +38,9 @@ unless ($Test::More::VERSION > 0.51) { for (@syms) { eval { Test::Leaner->import(import => [ $_ ]) }; - tm_is $@, '', "import $_"; - tm_is prototype($_), prototype("Test::More::$_"), "prototype $_"; + tm_is $@, '', "import $_"; + my $proto = ($_ eq 'unlike' and $Test::More::VERSION < 0.4802) + ? '$$;$' + : prototype("Test::More::$_"); + tm_is prototype($_), $proto, "prototype $_"; }