X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F010_self_introspection.t;h=11d96a109973f351de3205071b9f462fca95412e;hb=cb75020f6a75898378d873583561654f3519ea92;hp=659150152acfdda5b4a6ccdca8af56af0b8689cc;hpb=77ff94df67515d7fd7ab206c030474382f189aac;p=gitmo%2FClass-MOP.git diff --git a/t/010_self_introspection.t b/t/010_self_introspection.t index 6591501..11d96a1 100644 --- a/t/010_self_introspection.t +++ b/t/010_self_introspection.t @@ -3,7 +3,7 @@ use strict; use warnings; -use Test::More tests => 224; +use Test::More tests => 230; use Test::Exception; BEGIN { @@ -28,6 +28,7 @@ my $class_mop_module_meta = Class::MOP::Module->meta(); isa_ok($class_mop_module_meta, 'Class::MOP::Module'); my @class_mop_package_methods = qw( + _new initialize @@ -41,11 +42,13 @@ my @class_mop_package_methods = qw( ); my @class_mop_module_methods = qw( + _new version authority identifier ); my @class_mop_class_methods = qw( + _new initialize reinitialize create