add strict and warnings
[p5sagit/Devel-Declare.git] / t / method-no-semi.t
index 86eda8e..99bd472 100644 (file)
@@ -1,3 +1,5 @@
+use strict;
+use warnings;
 use Devel::Declare ();
 
 {
@@ -154,7 +156,7 @@ my ($test_method1, $test_method2, @test_list);
 
 }
 
-use Test::More 'no_plan';
+use Test::More;
 
 my $o = DeclareTest->new(attr => "value");
 
@@ -177,3 +179,5 @@ is($o->$test_method1('no', 'yes'), 'value, yes', 'anon method with @_ ok');
 is($o->$test_method2('this'), 'DeclareTest2, this', 'anon method with proto ok');
 
 is_deeply([ map { $_->() } @test_list ], [ 1, 2, 3, 4], 'binding ok');
+
+done_testing;