From: Stevan Little 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;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}; } }