[prev in list] [next in list] [prev in thread] [next in thread]
List: apreq-cvs
Subject: svn commit: r744390 -
From: joes () apache ! org
Date: 2009-02-14 4:57:52
Message-ID: 20090214045752.D24E223888A5 () eris ! apache ! org
[Download RAW message or body]
Author: joes
Date: Sat Feb 14 04:57:51 2009
New Revision: 744390
URL: http://svn.apache.org/viewvc?rev=744390&view=rev
Log:
free pkg_name by decrementing
the refcnt instead of making
it mortal
Modified:
httpd/apreq/trunk/glue/perl/xsbuilder/apreq_xs_postperl.h
Modified: httpd/apreq/trunk/glue/perl/xsbuilder/apreq_xs_postperl.h
URL: http://svn.apache.org/viewvc/httpd/apreq/trunk/glue/perl/xsbuilder/apreq_xs_postperl.h?rev=744390&r1=744389&r2=744390&view=diff
==============================================================================
--- httpd/apreq/trunk/glue/perl/xsbuilder/apreq_xs_postperl.h (original)
+++ httpd/apreq/trunk/glue/perl/xsbuilder/apreq_xs_postperl.h Sat Feb 14 04:57:51 \
2009 @@ -247,6 +247,7 @@
SV *pkg_name = newSVpv(class, 0);
Perl_load_module(aTHX_ PERL_LOADMOD_NOIMPORT, pkg_name, Nullsv);
stash = gv_stashpv(class, TRUE);
+ SvREFCNT_dec(pkg_name);
}
if (obj != Nullsv)
[prev in list] [next in list] [prev in thread] [next in thread]
Configure |
About |
News |
Add a list |
Sponsored by KoreLogic