{
package Foo;
- sub meta {
- InsideOutClass->initialize($_[0] => (
- ':attribute_metaclass' => 'InsideOutClass::Attribute'
- ))
- }
+ use metaclass 'InsideOutClass' => (
+ ':attribute_metaclass' => 'InsideOutClass::Attribute'
+ );
Foo->meta->add_attribute('foo' => (
accessor => 'foo',