sub load_class {
load_first_existing_class($_[0]);
- return;
+ # This is done to avoid breaking code which checked the return value. Said
+ # code is dumb. The return value was _always_ true, since it dies on
+ # failure!
+ return 1;
}
sub _is_valid_class_name {
);
Class::MOP::Package->meta->add_attribute(
- Class::MOP::Attribute->new('methods' => (
- reader => {
- # NOTE:
- # we just alias the original method
- # rather than re-produce it here
- 'get_method_map' => \&Class::MOP::Package::get_method_map
- },
- default => sub { {} }
- ))
-);
-
-Class::MOP::Package->meta->add_attribute(
Class::MOP::Attribute->new('method_metaclass' => (
reader => {
# NOTE:
in place of tricks like C<eval "use $module"> or using C<require>
unconditionally.
+If the module cannot be loaded, an exception is thrown.
+
+For historical reasons, this function returns explicitly returns a true value.
+
=item B<Class::MOP::is_class_loaded($class_name)>
Returns a boolean indicating whether or not C<$class_name> has been