From: gfx <gfuji@cpan.org>
Date: Thu, 3 Dec 2009 02:10:47 +0000 (+0900)
Subject: Fix a meta slot name
X-Git-Tag: 0.40_09~13
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=36d75a0a337e5ad1d9705e9d4d290cd5157219f1;p=gitmo%2FMouse.git

Fix a meta slot name
---

diff --git a/xs-src/Mouse.xs b/xs-src/Mouse.xs
index 331b5bf..6ae3817 100644
--- a/xs-src/Mouse.xs
+++ b/xs-src/Mouse.xs
@@ -306,7 +306,7 @@ mouse_class_initialize_object(pTHX_ SV* const meta, SV* const object, HV* const
     }
 
     if(MOUSE_xc_flags(xc) & MOUSEf_XC_IS_ANON){
-        set_slot(object, newSVpvs_flags("__ANON__", SVs_TEMP), meta);
+        set_slot(object, newSVpvs_flags("__METACLASS__", SVs_TEMP), meta);
     }
 
     FREETMPS;