X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fproto.t;h=bf13c9266193b8b1f470a688c4c6c9c1f26a33f7;hb=b52072dc659832e3465ecb4801024bc7c05ddad7;hp=ab08455024fd7e60e266deaae063f447578fba00;hpb=9026391e1fe16f5efd1d3af249a55b669f0e3618;p=p5sagit%2FDevel-Declare.git diff --git a/t/proto.t b/t/proto.t index ab08455..bf13c92 100644 --- a/t/proto.t +++ b/t/proto.t @@ -1,6 +1,6 @@ use strict; use warnings; -use Test::More 'no_plan'; +use Test::More; sub fun :lvalue { return my $sv; } @@ -24,3 +24,5 @@ my $foo = fun ($a, $b) { "woot" }; is($foo->(), '$a, $b: woot', 'proto declarator ok'); is(X(), 'what?', 'X sub restored ok'); + +done_testing;