From: Stevan Little <stevan.little@iinteractive.com>
Date: Wed, 28 Dec 2005 17:27:50 +0000 (+0000)
Subject: damn C3
X-Git-Tag: 0_10~4
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=e90e14cb0690b0c97f42e73cf6b31a694154f774;hp=494799c319ebf0a95aa8805a8e280fd5ed7651e4;p=gitmo%2FClass-C3.git

damn C3
---

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};        
     }   
 }