Remove some useless comments
Dave Rolsky [Mon, 7 Sep 2009 19:17:38 +0000 (14:17 -0500)]
lib/Moose/Meta/Role/Application/ToRole.pm

index dc9eed2..150def9 100644 (file)
@@ -76,9 +76,8 @@ sub apply_methods {
 
         if ($self->is_method_aliased($method_name)) {
             my $aliased_method_name = $self->get_method_aliases->{$method_name};
-            # it if it has one already
+
             if ($role2->has_method($aliased_method_name) &&
-                # and if they are not the same thing ...
                 $role2->get_method($aliased_method_name)->body != $role1->get_method($method_name)->body) {
 
                 require Moose;
@@ -100,9 +99,7 @@ sub apply_methods {
 
         next if $self->is_method_excluded($method_name);
 
-        # it if it has one already
         if ($role2->has_method($method_name) &&
-            # and if they are not the same thing ...
             $role2->get_method($method_name)->body != $role1->get_method($method_name)->body) {
             # method conflicts between roles result
             # in the method becoming a requirement
@@ -112,7 +109,6 @@ sub apply_methods {
             );
         }
         else {
-            # add it, although it could be overridden
             $role2->add_method(
                 $method_name,
                 $role1->get_method($method_name)