X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FClass%2FMOP%2FClass.pm;fp=lib%2FClass%2FMOP%2FClass.pm;h=439c38ebab5da3fcc287420a2502a0912445be62;hb=56c4a01259ce874e9c0d7728746c48b1421846c2;hp=d33b978b2eee2f614baf7539aaeaa2098e286b63;hpb=9e476743fabdfd64bbf3663b6ffe94a7705ac03a;p=gitmo%2FMoose.git

diff --git a/lib/Class/MOP/Class.pm b/lib/Class/MOP/Class.pm
index d33b978..439c38e 100644
--- a/lib/Class/MOP/Class.pm
+++ b/lib/Class/MOP/Class.pm
@@ -469,7 +469,7 @@ sub _remove_generated_metaobjects {
         no strict 'refs';
         @{$name . '::ISA'} = ();
         %{$name . '::'}    = ();
-        delete ${$first_fragments}{$last_fragment . '::'};
+        delete ${$first_fragments . '::'}{$last_fragment . '::'};
 
         Class::MOP::remove_metaclass_by_name($name);
     }