Change 31307 by [EMAIL PROTECTED] on 2007/05/29 15:48:27
Plug a memory leak in Encode
Affected files ...
... //depot/perl/ext/Encode/Encode.xs#129 edit
Differences ...
==== //depot/perl/ext/Encode/Encode.xs#129 (text) ====
Index: perl/ext/Encode/Encode.xs
--- perl/ext/Encode/Encode.xs#128~31305~ 2007-05-29 02:33:52.000000000
-0700
+++ perl/ext/Encode/Encode.xs 2007-05-29 08:48:27.000000000 -0700
@@ -87,6 +87,7 @@
LEAVE;
retval = newSVpv("",0);
sv_catsv(retval, temp);
+ SvREFCNT_dec(temp);
return retval;
}
End of Patch.