load_schema with shorten is broken

[dagolden]

When shortening, the shortened name is a glob alias, which causes class methods on the alias to get a class name that doesn't correspond to a metaclass registered with Class::MOP.

I think the fix is to do what aliased.pm does, which is to import a constant subroutine that returns the original package name, e.g. something like this:

*{ join q{::} => $callpack, $alias } = sub () { $package };

[dagolden]

Aha. Problem with aliased approach is that has to be done during BEGIN. So we could add an import API like this:

use Mongoose load_schema => { search_path => "My::Model", shorten => 1 };

That could then be made to do what load_schema does now except do the aliased.pm approach to aliasing.

But if load_schema is called at runtime, we have to clone the meta object in load_schema():

Class::MOP::store_metaclass_by_name( $short_name, $module->meta );

That appears to work, but feels brittle.

Not sure what you want to do.

[dagolden]

See SHA: 8ac44e4

[dagolden]

Whoops. Wrong button. (Sigh)

[rodrigolive]

There. For now, cloning the metadata feels like it will do. The new load_schema API on use Mongoose feels a bit out of place, need to sleep on it some more.