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

Applying class metaroles before the other roles seems to do the right thing.

Browse source
This commit is contained in:
Colin Kuskie 2010-03-05 10:28:32 -08:00
parent 3c790d9ce5
commit ecd31580cf
2 changed files with 8 additions and 8 deletions
Download patch file Download diff file Expand all files Collapse all files

8
lib/WebGUI/Definition/Asset.pm
View file

@ -78,16 +78,16 @@ sub init_meta {
my %args = @_;
my $for_class = $args{for_class};
if ($for_class->meta->isa('Moose::Meta::Class')) {
Moose::Util::apply_all_roles(
$for_class,
'WebGUI::Definition::Role::Asset',
);
Moose::Util::MetaRole::apply_metaroles(
for => $for_class,
class_metaroles => {
class => ['WebGUI::Definition::Meta::Asset'],
},
);
Moose::Util::apply_all_roles(
$for_class,
'WebGUI::Definition::Role::Asset',
);
}
else {
Moose::Util::MetaRole::apply_metaroles(