Moose::throw_error -> Moose->throw_error

[gitmo/Moose.git] / lib / Moose / Util.pm

diff --git a/lib/Moose/Util.pm b/lib/Moose/Util.pm
index a428d2d..ad87688 100644 (file)
--- a/lib/Moose/Util.pm
+++ b/lib/Moose/Util.pm
@@ -72,7 +72,7 @@ sub search_class_by_role {
 sub apply_all_roles {
     my $applicant = shift;
 
-    Moose::throw_error("Must specify at least one role to apply to $applicant") unless @_;
+    Moose->throw_error("Must specify at least one role to apply to $applicant") unless @_;
 
     my $roles = Data::OptList::mkopt( [@_] );
 
@@ -83,7 +83,7 @@ sub apply_all_roles {
     }
 
     ( $_->[0]->can('meta') && $_->[0]->meta->isa('Moose::Meta::Role') )
-        || Moose::throw_error("You can only consume roles, "
+        || Moose->throw_error("You can only consume roles, "
         . $_->[0]
         . " is not a Moose role")
         foreach @$roles;