X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fsmoke.t;h=d5ab2179a7ac12232d9ed984cde205444c7e796f;hb=d3b7b05c7584038b24f8c6a17a0266e9ea76731c;hp=763abccc1674c9be253853bf6b43d3b41e46ec6b;hpb=b9534efa68de9ed002dddef31f2a51759fe59e0e;p=p5sagit%2FSub-Name.git diff --git a/t/smoke.t b/t/smoke.t index 763abcc..d5ab217 100644 --- a/t/smoke.t +++ b/t/smoke.t @@ -3,7 +3,7 @@ use warnings; BEGIN { $^P |= 0x210 } -use Test::More 0.88; +use Test::More tests => 10; use Sub::Name; my $x = subname foo => sub { (caller 0)[3] }; @@ -40,5 +40,4 @@ for ("Blork:: Bar!", "Foo::Bar::Baz") { ::is($DB::sub{$_}, $anon); } -::done_testing; # vim: ft=perl