X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=xs-src%2FMouse.xs;h=d7cdb78dd6b740e0621b18eeeb3b02b67b67dd2c;hb=a4cbb3cb944aa43521dfa69a9f04b206c6b7a6ea;hp=0a94ec82675926c5f06efd4aaf8f5ddf54d7813a;hpb=ca861dd989ddc9868e5c69a39844e1e888bb9508;p=gitmo%2FMouse.git 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);