stas 2003/10/22 18:11:35
Modified: src/modules/perl mod_perl.c
Log:
after other parent perls were started in vhosts, make sure that
the context is set to the base_perl
Revision Changes Path
1.198 +7 -0 modperl-2.0/src/modules/perl/mod_perl.c
Index: mod_perl.c
===================================================================
RCS file: /home/cvs/modperl-2.0/src/modules/perl/mod_perl.c,v
retrieving revision 1.197
retrieving revision 1.198
diff -u -u -r1.197 -r1.198
--- mod_perl.c 23 Oct 2003 01:10:55 -0000 1.197
+++ mod_perl.c 23 Oct 2003 01:11:35 -0000 1.198
@@ -465,6 +465,13 @@
exit(1); /*XXX*/
}
}
+
+#ifdef USE_ITHREADS
+ /* after other parent perls were started in vhosts, make sure that
+ * the context is set to the base_perl */
+ PERL_SET_CONTEXT(base_perl);
+#endif
+
}
#ifdef USE_ITHREADS
