oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

fix more things for metaclass roles

Browse source
This commit is contained in:
Graham Knop 2010-02-19 11:55:36 -06:00
parent 13b753850f
commit a2f0cbe9ba
6 changed files with 57 additions and 45 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lib/WebGUI/Definition.pm
View file

@ -77,8 +77,8 @@ sub init_meta {
Moose->init_meta(%args);
Moose::Util::MetaRole::apply_base_class_roles(
for => $args{for_class},
roles => ['WebGUI::Definition::Role::Object'],
for => $args{for_class},
roles => [ 'WebGUI::Definition::Role::Object' ],
);
Moose::Util::MetaRole::apply_metaroles(
for => $args{for_class},
@ -86,6 +86,7 @@ sub init_meta {
class => ['WebGUI::Definition::Meta::Class'],
},
);
return $args{for_class}->meta;
}
#-------------------------------------------------------------------