rename Overriden to Overridden
Dave Rolsky [Wed, 4 Feb 2009 17:24:44 +0000 (17:24 +0000)]
lib/Moose.pm
lib/Moose/Meta/Class.pm
lib/Moose/Meta/Method/Augmented.pm
lib/Moose/Meta/Method/Overridden.pm [moved from lib/Moose/Meta/Method/Overriden.pm with 94% similarity]
t/030_roles/008_role_conflict_edge_cases.t

index 5f87f39..6d8b417 100644 (file)
@@ -270,7 +270,7 @@ $_->make_immutable(
     Moose::Meta::Method::Accessor
     Moose::Meta::Method::Constructor
     Moose::Meta::Method::Destructor
-    Moose::Meta::Method::Overriden
+    Moose::Meta::Method::Overridden
     Moose::Meta::Method::Augmented
 
     Moose::Meta::Role
index efea6f9..152c3c0 100644 (file)
@@ -15,7 +15,7 @@ our $VERSION   = '0.67';
 $VERSION = eval $VERSION;
 our $AUTHORITY = 'cpan:STEVAN';
 
-use Moose::Meta::Method::Overriden;
+use Moose::Meta::Method::Overridden;
 use Moose::Meta::Method::Augmented;
 use Moose::Error::Default;
 
@@ -212,7 +212,7 @@ sub add_override_method_modifier {
     (!$self->has_method($name))
         || $self->throw_error("Cannot add an override method if a local method is already present");
 
-    $self->add_method($name => Moose::Meta::Method::Overriden->new(
+    $self->add_method($name => Moose::Meta::Method::Overridden->new(
         method  => $method,
         class   => $self,
         package => $_super_package, # need this for roles
@@ -238,7 +238,7 @@ sub _find_next_method_by_name_which_is_not_overridden {
     my ($self, $name) = @_;
     foreach my $method ($self->find_all_methods_by_name($name)) {
         return $method->{code}
-            if blessed($method->{code}) && !$method->{code}->isa('Moose::Meta::Method::Overriden');
+            if blessed($method->{code}) && !$method->{code}->isa('Moose::Meta::Method::Overridden');
     }
     return undef;
 }
index ab920ad..a7a54d8 100644 (file)
@@ -26,7 +26,7 @@ sub new {
 
     my $_super_package = $super->package_name;
     # BUT!,... if this is an overridden method ....
-    if ($super->isa('Moose::Meta::Method::Overriden')) {
+    if ($super->isa('Moose::Meta::Method::Overridden')) {
         # we need to be sure that we actually
         # find the next method, which is not
         # an 'override' method, the reason is
similarity index 94%
rename from lib/Moose/Meta/Method/Overriden.pm
rename to lib/Moose/Meta/Method/Overridden.pm
index 31182cc..99e71b7 100644 (file)
@@ -1,4 +1,4 @@
-package Moose::Meta::Method::Overriden;
+package Moose::Meta::Method::Overridden;
 
 use strict;
 use warnings;
@@ -55,7 +55,7 @@ __END__
 
 =head1 NAME
 
-Moose::Meta::Method::Overriden - A Moose Method metaclass for overridden methods
+Moose::Meta::Method::Overridden - A Moose Method metaclass for overridden methods
 
 =head1 DESCRIPTION
 
index 3ff06cd..46dcbcb 100644 (file)
@@ -88,7 +88,7 @@ ok(Role::Base2->meta->has_override_method_modifier('foo'), '... have the method
 ok(Role::Derived3->meta->has_override_method_modifier('foo'), '... have the method foo as expected');
 ok(Role::Derived4->meta->has_override_method_modifier('foo'), '... have the method foo as expected');
 ok(My::Test::Class2->meta->has_method('foo'), '... have the method foo as expected');
-isa_ok(My::Test::Class2->meta->get_method('foo'), 'Moose::Meta::Method::Overriden');
+isa_ok(My::Test::Class2->meta->get_method('foo'), 'Moose::Meta::Method::Overridden');
 ok(My::Test::Class2::Base->meta->has_method('foo'), '... have the method foo as expected');
 isa_ok(My::Test::Class2::Base->meta->get_method('foo'), 'Class::MOP::Method');