stas 02/01/17 22:50:10
Modified: src/modules/perl mod_perl.c
Log:
- modperl_startup() already handles PerlModule/Require directives, so
handle these separately inly if modperl_startup() wasn't called. which is
the case for vhosts which inherit the perl interpretor from the base.
Revision Changes Path
1.105 +8 -7 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.104
retrieving revision 1.105
diff -u -r1.104 -r1.105
--- mod_perl.c 9 Jan 2002 00:31:39 -0000 1.104
+++ mod_perl.c 18 Jan 2002 06:50:10 -0000 1.105
@@ -264,14 +264,15 @@
"created parent interpreter for VirtualHost %s\n",
modperl_server_desc(s, p));
}
-
- if (!modperl_config_apply_PerlModule(s, scfg, perl, p)) {
- exit(1);
- }
- if (!modperl_config_apply_PerlRequire(s, scfg, perl, p)) {
- exit(1);
+ else {
+ if (!modperl_config_apply_PerlModule(s, scfg, perl, p)) {
+ exit(1);
+ }
+ if (!modperl_config_apply_PerlRequire(s, scfg, perl, p)) {
+ exit(1);
+ }
}
-
+
#ifdef USE_ITHREADS
if (!MpSrvENABLE(scfg)) {
