X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMooseX-Object-Pluggable.git;a=blobdiff_plain;f=lib%2FMooseX%2FObject%2FPluggable.pm;fp=lib%2FMooseX%2FObject%2FPluggable.pm;h=7734ab7360d4fab82ce7180b272e61cf9e64d521;hp=30956e1f0805c691be6d2bdbaca0f22731c3a49f;hb=16d6797e174786de65266b62d16f70e8a0bc3c27;hpb=78f07575f321ab6e9b8a8c86c2a2c3c07b432eda diff --git a/lib/MooseX/Object/Pluggable.pm b/lib/MooseX/Object/Pluggable.pm index 30956e1..7734ab7 100644 --- a/lib/MooseX/Object/Pluggable.pm +++ b/lib/MooseX/Object/Pluggable.pm @@ -2,7 +2,7 @@ package MooseX::Object::Pluggable; use Carp; use Moose::Role; -use Class::MOP; +use Class::Load 'load_class'; use Scalar::Util 'blessed'; use Module::Pluggable::Object; @@ -231,7 +231,7 @@ sub _load_and_apply_role{ die("You must provide a role name") unless @roles; foreach my $role ( @roles ) { - eval { Class::MOP::load_class($role) }; + eval { load_class($role) }; confess("Failed to load role: ${role} $@") if $@; carp("Using 'override' is strongly discouraged and may not behave ".