Remove unused bit of code
Dave Rolsky [Fri, 20 Mar 2009 16:43:51 +0000 (11:43 -0500)]
lib/Moose/Meta/Attribute.pm

index a4d83ba..e487ca3 100644 (file)
@@ -246,28 +246,23 @@ sub clone {
 
     my $class = $params{metaclass} || ref $self;
 
-    if ( 0 and $class eq ref $self ) {
-        return $self->SUPER::clone(%params);
-    } else {
-        my ( @init, @non_init );
+    my ( @init, @non_init );
 
-        foreach my $attr ( grep { $_->has_value($self) } $self->meta->compute_all_applicable_attributes ) {
-            push @{ $attr->has_init_arg ? \@init : \@non_init }, $attr;
-        }
-
-        my %new_params = ( ( map { $_->init_arg => $_->get_value($self) } @init ), %params );
-
-        my $name = delete $new_params{name};
+    foreach my $attr ( grep { $_->has_value($self) } $self->meta->compute_all_applicable_attributes ) {
+        push @{ $attr->has_init_arg ? \@init : \@non_init }, $attr;
+    }
 
-        my $clone = $class->new($name, %new_params, __hack_no_process_options => 1 );
+    my %new_params = ( ( map { $_->init_arg => $_->get_value($self) } @init ), %params );
 
-        foreach my $attr ( @non_init ) {
-            $attr->set_value($clone, $attr->get_value($self));
-        }
+    my $name = delete $new_params{name};
 
+    my $clone = $class->new($name, %new_params, __hack_no_process_options => 1 );
 
-        return $clone;
+    foreach my $attr ( @non_init ) {
+        $attr->set_value($clone, $attr->get_value($self));
     }
+
+    return $clone;
 }
 
 sub _process_options {