From 14d0bf15ab9cbc06fdc12ce11e473a35ab9372f3 Mon Sep 17 00:00:00 2001 From: franck cuny Date: Thu, 29 Apr 2010 14:38:23 +0200 Subject: add count to attributes and methods --- t/10_private_method.t | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 't/10_private_method.t') diff --git a/t/10_private_method.t b/t/10_private_method.t index 9948983..f71ea57 100644 --- a/t/10_private_method.t +++ b/t/10_private_method.t @@ -56,8 +56,7 @@ with_immutable { isa_ok( $bar, 'Bar' ); dies_ok { $bar->newbar() } "... can't call bar, method is private"; - is scalar @{ $foo->meta->local_private_methods }, 2, - '... got two privates method'; + is $foo->meta->_count_private_methods, 2, "... got two privates method"; } (qw/Foo Bar/); -- cgit v1.2.3