Author: stas
Date: Fri May 20 20:31:05 2005
New Revision: 171191

URL: http://svn.apache.org/viewcvs?rev=171191&view=rev
Log:
for some reason modperl_interp_unselect(interp) breaks prefork

Modified:
    perl/modperl/trunk/src/modules/perl/modperl_module.c

Modified: perl/modperl/trunk/src/modules/perl/modperl_module.c
URL: 
http://svn.apache.org/viewcvs/perl/modperl/trunk/src/modules/perl/modperl_module.c?rev=171191&r1=171190&r2=171191&view=diff
==============================================================================
--- perl/modperl/trunk/src/modules/perl/modperl_module.c (original)
+++ perl/modperl/trunk/src/modules/perl/modperl_module.c Fri May 20 20:31:05 
2005
@@ -192,7 +192,8 @@
 
     if (!base_obj || (base_obj == add_obj)) {
 #ifdef USE_ITHREADS
-        modperl_interp_unselect(interp);
+        /* XXX: breaks prefork
+           modperl_interp_unselect(interp); */
         if (orig_perl) {
             MP_PERL_CONTEXT_RESTORE;
         }
@@ -246,7 +247,8 @@
     }
 
 #ifdef USE_ITHREADS
-    modperl_interp_unselect(interp);
+    /* XXX: breaks prefork
+       modperl_interp_unselect(interp); */
     if (orig_perl) {
         MP_PERL_CONTEXT_RESTORE;
     }


Reply via email to