B::Hooks::OP::Check::Install::Files is not indexed

[p5sagit/Devel-Declare.git] / t / proto.t

diff --git a/t/proto.t b/t/proto.t
index 240eb09..506677e 100644 (file)
--- a/t/proto.t
+++ b/t/proto.t
@@ -1,13 +1,13 @@
 use strict;
 use warnings;
-use Test::More 'no_plan';
+use Test::More 0.88;
 
 sub fun :lvalue { return my $sv; }
 
 sub X { "what?" }
 
 sub handle_fun {
-  my ($pack, $use, $name, $proto) = @_;
+  my ($usepack, $use, $inpack, $name, $proto) = @_;
   my $XX = sub (&) {
     my $cr = $_[0];
     return sub {
@@ -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;