X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fmethod-no-semi.t;h=99bd4725443e2f1ce0988ca93d8b989d51725af2;hb=8343b16e878b4ba015aea44f095452ded06129a7;hp=86eda8e61d61d44fb132a063a4d066c3276eb7f0;hpb=b9a35c84131e13830d041a7af60b245d272abda4;p=p5sagit%2FDevel-Declare.git diff --git a/t/method-no-semi.t b/t/method-no-semi.t index 86eda8e..99bd472 100644 --- a/t/method-no-semi.t +++ b/t/method-no-semi.t @@ -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;