X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fsmoke.t;h=d5ab2179a7ac12232d9ed984cde205444c7e796f;hb=HEAD;hp=1e1c011a2797e3e8849834a2ebd0cfdfc4566703;hpb=a0f015f538bfe3a5a1eda54ac0b00bdff973cdd4;p=p5sagit%2FSub-Name.git

diff --git a/t/smoke.t b/t/smoke.t
index 1e1c011..d5ab217 100644
--- a/t/smoke.t
+++ b/t/smoke.t
@@ -1,6 +1,9 @@
+use strict;
+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] };
@@ -37,5 +40,4 @@ for ("Blork:: Bar!", "Foo::Bar::Baz") {
     ::is($DB::sub{$_}, $anon);
 }
 
-::done_testing;
 # vim: ft=perl