X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=xs%2FMOP.xs;h=5dfc0cd33e0cf32b56e7569d5ceda55fa9825753;hb=efc98200d49cae9fb74285a58d12e3b988da0a97;hp=cf07b550d41584115fb2cae237e9a663bc8beb0a;hpb=58f2ff6389737c2b492dd6874250ba2e45abca57;p=gitmo%2FClass-MOP.git

diff --git a/xs/MOP.xs b/xs/MOP.xs
index cf07b55..5dfc0cd 100644
--- a/xs/MOP.xs
+++ b/xs/MOP.xs
@@ -47,8 +47,8 @@ get_code_info(coderef)
     PPCODE:
         if (mop_get_code_info(coderef, &pkg, &name)) {
             EXTEND(SP, 2);
-            PUSHs(newSVpv(pkg, 0));
-            PUSHs(newSVpv(name, 0));
+            mPUSHs(newSVpv(pkg, 0));
+            mPUSHs(newSVpv(name, 0));
         }
 
 # This is some pretty grotty logic. It _should_ be parallel to the