RIP .travis.yml

[p5sagit/Sub-Name.git] / t / smoke.t

diff --git a/t/smoke.t b/t/smoke.t
index 763abcc..0f5022c 100644 (file)
--- a/t/smoke.t
+++ b/t/smoke.t
@@ -3,7 +3,8 @@ use warnings;
 
 BEGIN { $^P |= 0x210 }
 
-use Test::More 0.88;
+use Test::More;
+use if $ENV{AUTHOR_TESTING}, 'Test::Warnings';
 use Sub::Name;
 
 my $x = subname foo => sub { (caller 0)[3] };
@@ -40,5 +41,5 @@ for ("Blork:: Bar!", "Foo::Bar::Baz") {
     ::is($DB::sub{$_}, $anon);
 }
 
-::done_testing;
+::done_testing();
 # vim: ft=perl