X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=xs%2FHasMethods.xs;fp=xs%2FHasMethods.xs;h=0e617eb85156bec2d9f4bf7a283de73609ccef6c;hb=53362bcb1b32d87630190fbf50679dc37bb51adf;hp=44bb8d5aa2e66cacc7c5effbc34d64248ea250de;hpb=0c00ef84aff494ca3505de93298226ccac5cc663;p=gitmo%2FClass-MOP.git

diff --git a/xs/HasMethods.xs b/xs/HasMethods.xs
index 44bb8d5..0e617eb 100644
--- a/xs/HasMethods.xs
+++ b/xs/HasMethods.xs
@@ -84,3 +84,5 @@ BOOT:
     mop_method_metaclass     = newSVpvs("method_metaclass");
     mop_associated_metaclass = newSVpvs("associated_metaclass");
     mop_wrap                 = newSVpvs("wrap");
+    INSTALL_SIMPLE_READER(Mixin::HasMethods, method_metaclass);
+    INSTALL_SIMPLE_READER(Mixin::HasMethods, wrapped_method_metaclass);