X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FClass%2FC3.pm;h=9d5a1d7338b0e0532aeb191a6f11fa6fe7cc5124;hb=e90e14cb0690b0c97f42e73cf6b31a694154f774;hp=4ad6f4d31a24d448bd45d113f4b04b656c7cd986;hpb=494799c319ebf0a95aa8805a8e280fd5ed7651e4;p=gitmo%2FClass-C3.git

diff --git a/lib/Class/C3.pm b/lib/Class/C3.pm
index 4ad6f4d..9d5a1d7 100644
--- a/lib/Class/C3.pm
+++ b/lib/Class/C3.pm
@@ -139,9 +139,9 @@ sub _remove_method_dispatch_table {
     no strict 'refs';
     delete ${"${class}::"}{"()"} if $MRO{$class}->{has_overload_fallback};    
     foreach my $method (keys %{$MRO{$class}->{methods}}) {
-        ${"${class}::"}{$method}{CODE} = undef
-          if defined ${"${class}::"}{$method}{CODE} &&
-             ${"${class}::"}{$method}{CODE} eq $MRO{$class}->{methods}->{$method}->{code};        
+        delete ${"${class}::"}{$method};
+          #if defined ${"${class}::"}{$method}{CODE} &&
+          #   ${"${class}::"}{$method}{CODE} eq $MRO{$class}->{methods}->{$method}->{code};        
     }   
 }