X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMouse.git;a=blobdiff_plain;f=xs-src%2FMouse.xs;h=d7cdb78dd6b740e0621b18eeeb3b02b67b67dd2c;hp=0a94ec82675926c5f06efd4aaf8f5ddf54d7813a;hb=f8beb873dc6db9067aacdada68d0158366570f28;hpb=e83a2ae7aa566943bd49426e77146127511acad3 diff --git a/xs-src/Mouse.xs b/xs-src/Mouse.xs index 0a94ec8..d7cdb78 100644 --- a/xs-src/Mouse.xs +++ b/xs-src/Mouse.xs @@ -610,10 +610,10 @@ CODE: SAVESPTR(GvSV(statusvalue)); /* local $? */ SAVESPTR(ERRSV); /* local $@ */ - GvSV(statusvalue) = sv_2mortal(newSViv(0)); - ERRSV = sv_2mortal(newSVpvs("")); + GvSV(statusvalue) = sv_newmortal(); + ERRSV = newSVpvs_flags("", SVs_TEMP); for(i = 0; i < len; i++){ - dSP; + SPAGAIN; PUSHMARK(SP); XPUSHs(object);