Author: gozer
Date: Sun Dec  2 23:19:59 2007
New Revision: 600439

URL: http://svn.apache.org/viewvc?rev=600439&view=rev
Log:
Avoid possible segfault when PerlFreshRestart is On.

Reviewed-by: gozer
Submitted-by: Michael Rendell <[EMAIL PROTECTED]>
Message-Id: <[EMAIL PROTECTED]>


Modified:
    perl/modperl/branches/1.x/Changes
    perl/modperl/branches/1.x/src/modules/perl/perl_util.c

Modified: perl/modperl/branches/1.x/Changes
URL: 
http://svn.apache.org/viewvc/perl/modperl/branches/1.x/Changes?rev=600439&r1=600438&r2=600439&view=diff
==============================================================================
--- perl/modperl/branches/1.x/Changes (original)
+++ perl/modperl/branches/1.x/Changes Sun Dec  2 23:19:59 2007
@@ -10,6 +10,9 @@
 
 =item 1.31-dev
 
+Avoid possible segfault when PerlFreshRestart is On.
+[Michael Rendell <[EMAIL PROTECTED]>]
+
 Fix shared libary extensions on Win32 to be .dll not .so
 [Nikolay Ananiev <[EMAIL PROTECTED]>]
 

Modified: perl/modperl/branches/1.x/src/modules/perl/perl_util.c
URL: 
http://svn.apache.org/viewvc/perl/modperl/branches/1.x/src/modules/perl/perl_util.c?rev=600439&r1=600438&r2=600439&view=diff
==============================================================================
--- perl/modperl/branches/1.x/src/modules/perl/perl_util.c (original)
+++ perl/modperl/branches/1.x/src/modules/perl/perl_util.c Sun Dec  2 23:19:59 
2007
@@ -486,7 +486,7 @@
 
     hv_iterinit(hash);
     while ((entry = hv_iternext(hash))) {
-       ap_table_setn(reload, HeKEY(entry), "1");
+       ap_table_set(reload, HeKEY(entry), "1");
     }
 
     {


Reply via email to