svn commit: r649412 - in /perl/modperl/trunk: Changes src/modules/perl/mod_perl.c

[gozer]

Author: gozer
Date: Fri Apr 18 01:53:11 2008
New Revision: 649412

URL: http://svn.apache.org/viewvc?rev=649412&view=rev
Log:
Make sure mod_perl's own ChildInitHandlers are run before user
supplied ones. This fixes the incorrectly reported value of $$
at ChildInit time

Reported-By: Mark Blackman <[EMAIL PROTECTED]>
Message-Id: <[EMAIL PROTECTED]>


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

Modified: perl/modperl/trunk/Changes
URL: 
http://svn.apache.org/viewvc/perl/modperl/trunk/Changes?rev=649412&r1=649411&r2=649412&view=diff
==============================================================================
--- perl/modperl/trunk/Changes (original)
+++ perl/modperl/trunk/Changes Fri Apr 18 01:53:11 2008
@@ -12,6 +12,10 @@
 
 =item 2.0.5-dev
 
+Make sure mod_perl's own ChildInitHandlers are run before user
+supplied ones. This fixes the incorrectly reported value of $$
+at ChildInit time [Gozer]
+
 =item 2.0.4 April 16, 2008
 
 Fix $r->location corruption under certain conditions

Modified: perl/modperl/trunk/src/modules/perl/mod_perl.c
URL: 
http://svn.apache.org/viewvc/perl/modperl/trunk/src/modules/perl/mod_perl.c?rev=649412&r1=649411&r2=649412&view=diff
==============================================================================
--- perl/modperl/trunk/src/modules/perl/mod_perl.c (original)
+++ perl/modperl/trunk/src/modules/perl/mod_perl.c Fri Apr 18 01:53:11 2008
@@ -896,7 +896,7 @@
                           NULL, NULL, MODPERL_HOOK_REALLY_REALLY_FIRST);
 
     ap_hook_child_init(modperl_hook_child_init,
-                       NULL, NULL, APR_HOOK_FIRST);
+                       NULL, NULL, MODPERL_HOOK_REALLY_REALLY_FIRST);
 
     modperl_register_handler_hooks();
 }