X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMouse.git;a=blobdiff_plain;f=lib%2FMouse%2FMeta%2FClass.pm;h=1093e0220f30b275a1cd8d79d2c181086fdc6878;hp=c1e614a544b38c88c3aa205e77012e587aea3fa6;hb=2efc0af104c1926c066f50e1785236254bda12a2;hpb=a497c7d3c518bbecf930e3f17d7a75b9bf84fa2f diff --git a/lib/Mouse/Meta/Class.pm b/lib/Mouse/Meta/Class.pm index c1e614a..1093e02 100644 --- a/lib/Mouse/Meta/Class.pm +++ b/lib/Mouse/Meta/Class.pm @@ -192,6 +192,10 @@ sub new_object { $trigger->($instance, $value); } + if($self->is_anon_class){ + $instance->{__METACLASS__} = $self; + } + return $instance; }