Author: gozer
Date: Wed May 18 06:34:18 2005
New Revision: 170747

URL: http://svn.apache.org/viewcvs?rev=170747&view=rev
Log:
fix global anon_cnt double-initialization bug that was causing
startup segfaults on OSX.  This could be re-introducing an older
anonsub handler problem though.


Modified:
    perl/modperl/trunk/Changes
    perl/modperl/trunk/src/modules/perl/mod_perl.c
    perl/modperl/trunk/src/modules/perl/modperl_handler.c

Modified: perl/modperl/trunk/Changes
URL: 
http://svn.apache.org/viewcvs/perl/modperl/trunk/Changes?rev=170747&r1=170746&r2=170747&view=diff
==============================================================================
--- perl/modperl/trunk/Changes (original)
+++ perl/modperl/trunk/Changes Wed May 18 06:34:18 2005
@@ -12,6 +12,9 @@
 
 =item 2.000_00-dev
 
+fix global anon_cnt double-initialization bug that was causing
+startup segfaults on OSX. [Gozer]
+
 fix the ap_install target in the top-level Makefile (used for static
 build) [Stas]
 

Modified: perl/modperl/trunk/src/modules/perl/mod_perl.c
URL: 
http://svn.apache.org/viewcvs/perl/modperl/trunk/src/modules/perl/mod_perl.c?rev=170747&r1=170746&r2=170747&view=diff
==============================================================================
--- perl/modperl/trunk/src/modules/perl/mod_perl.c (original)
+++ perl/modperl/trunk/src/modules/perl/mod_perl.c Wed May 18 06:34:18 2005
@@ -532,6 +532,9 @@
     modperl_global_init_server_rec(pconf, s);
 
     modperl_tls_create_request_rec(pconf);
+
+    /* init the counter to 0 */
+    modperl_global_anon_cnt_init(pconf);
 }
 
 /*

Modified: perl/modperl/trunk/src/modules/perl/modperl_handler.c
URL: 
http://svn.apache.org/viewcvs/perl/modperl/trunk/src/modules/perl/modperl_handler.c?rev=170747&r1=170746&r2=170747&view=diff
==============================================================================
--- perl/modperl/trunk/src/modules/perl/modperl_handler.c (original)
+++ perl/modperl/trunk/src/modules/perl/modperl_handler.c Wed May 18 06:34:18 
2005
@@ -89,9 +89,6 @@
         modperl_modglobal_lookup(aTHX_ "ANONSUB");
     MP_TRACE_h(MP_FUNC, "init $PL_modglobal{ANONSUB} = []");
     MP_MODGLOBAL_STORE_HV(gkey);
-
-    /* init the counter to 0 */
-    modperl_global_anon_cnt_init(p);
 }
 
 /* allocate and populate the anon handler sub-struct */


Reply via email to