diff --git a/lib/WebGUI/Definition.pm b/lib/WebGUI/Definition.pm
index 6734d883e..5d43c44f0 100644
--- a/lib/WebGUI/Definition.pm
+++ b/lib/WebGUI/Definition.pm
@@ -19,6 +19,7 @@ use feature ();
 
 use Moose ();
 use Moose::Exporter;
+use Moose::Util;
 use Moose::Util::MetaRole;
 
 use namespace::autoclean;
@@ -76,9 +77,9 @@ sub init_meta {
 
     my $for_class = $args{for_class};
     if ($for_class->meta->isa('Moose::Meta::Class')) {
-        Moose::Util::MetaRole::apply_base_class_roles(
-            for   => $for_class,
-            roles => [ 'WebGUI::Definition::Role::Object' ],
+        Moose::Util::apply_all_roles(
+            $for_class,
+            'WebGUI::Definition::Role::Object',
         );
         Moose::Util::MetaRole::apply_metaroles(
             for             => $for_class,
diff --git a/lib/WebGUI/Definition/Asset.pm b/lib/WebGUI/Definition/Asset.pm
index cd82902f1..741aece11 100644
--- a/lib/WebGUI/Definition/Asset.pm
+++ b/lib/WebGUI/Definition/Asset.pm
@@ -78,9 +78,9 @@ sub init_meta {
     my %args = @_;
     my $for_class = $args{for_class};
     if ($for_class->meta->isa('Moose::Meta::Class')) {
-        Moose::Util::MetaRole::apply_base_class_roles(
-            for   => $for_class,
-            roles => [ 'WebGUI::Definition::Role::Asset' ],
+        Moose::Util::apply_all_roles(
+            $for_class,
+            'WebGUI::Definition::Role::Asset',
         );
         Moose::Util::MetaRole::apply_metaroles(
             for             => $for_class,