use strict;
use warnings;
-use Scalar::Util 'blessed';
+use Mouse::Util qw/get_linear_isa blessed/;
use Carp 'confess';
-use MRO::Compat;
use Class::Method::Modifiers ();
do {
sub has_attribute { exists $_[0]->{attributes}->{$_[1]} }
sub get_attribute { $_[0]->{attributes}->{$_[1]} }
-sub linearized_isa { @{ mro::get_linear_isa($_[0]->name) } }
+sub linearized_isa { @{ get_linear_isa($_[0]->name) } }
sub clone_object {
my $class = shift;