X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMouse%2FUtil.pm;h=b99cd8fa628b9bc031bc52b5f0a5479323beb13c;hb=f12892e59f19c4ef3715bf79e0622582c7522fea;hp=34f6eeebd57cf726f9fcbfbd2478aff2d713dcbb;hpb=ba153b332782dce8bf44fcc78ebb7230002b950c;p=gitmo%2FMouse.git diff --git a/lib/Mouse/Util.pm b/lib/Mouse/Util.pm index 34f6eee..b99cd8f 100644 --- a/lib/Mouse/Util.pm +++ b/lib/Mouse/Util.pm @@ -73,10 +73,10 @@ Mouse::Exporter->setup_import_methods( require Mouse::Meta::Module; # for the entities of metaclass cache utilities BEGIN { - *class_of = \&Mouse::Meta::Module::class_of; - *get_metaclass_by_name = \&Mouse::Meta::Module::get_metaclass_by_name; - *get_all_metaclass_instances = \&Mouse::Meta::Module::get_all_metaclass_instances; - *get_all_metaclass_names = \&Mouse::Meta::Module::get_all_metaclass_names; + *class_of = \&Mouse::Meta::Module::_class_of; + *get_metaclass_by_name = \&Mouse::Meta::Module::_get_metaclass_by_name; + *get_all_metaclass_instances = \&Mouse::Meta::Module::_get_all_metaclass_instances; + *get_all_metaclass_names = \&Mouse::Meta::Module::_get_all_metaclass_names; # is-a predicates generate_isa_predicate_for('Mouse::Meta::TypeConstraint' => 'is_a_type_constraint');