X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMouse.git;a=blobdiff_plain;f=xs-src%2FMouseUtil.xs;h=006eab252405213ac81e496e9e58ef13b49fb048;hp=b8afb8053f481cb8b5f5a9c6aee9119ebeddd31f;hb=01f892fafd4633960960c120650e32ecf549e369;hpb=6ad77996af3989f512a308404b2593c369d18e14 diff --git a/xs-src/MouseUtil.xs b/xs-src/MouseUtil.xs index b8afb80..006eab2 100644 --- a/xs-src/MouseUtil.xs +++ b/xs-src/MouseUtil.xs @@ -377,6 +377,6 @@ PPCODE: } if(predicate_name == NULL){ /* anonymous predicate */ - XPUSHs( newRV_noinc((SV*)xsub) ); + mXPUSHs( newRV_inc((SV*)xsub) ); } }