You are viewing a plain text version of this content. The canonical link for it is here.
Posted to modperl-cvs@perl.apache.org by do...@hyperreal.org on 1999/01/18 23:07:31 UTC
cvs commit: modperl/src/modules/perl mod_perl.c
dougm 99/01/18 14:07:31
Modified: src/modules/perl mod_perl.c
Log:
need this w/o other handlers enabled
Revision Changes Path
1.70 +5 -0 modperl/src/modules/perl/mod_perl.c
Index: mod_perl.c
===================================================================
RCS file: /export/home/cvs/modperl/src/modules/perl/mod_perl.c,v
retrieving revision 1.69
retrieving revision 1.70
diff -u -r1.69 -r1.70
--- mod_perl.c 1999/01/18 04:25:57 1.69
+++ mod_perl.c 1999/01/18 22:07:29 1.70
@@ -760,6 +760,11 @@
perl_stdout2client(r);
perl_stdin2client(r);
+ if(!cfg) {
+ cfg = perl_create_request_config(r->pool, r->server);
+ set_module_config(r->request_config, &perl_module, cfg);
+ }
+
cfg->setup_env = 1;
PERL_CALLBACK("PerlHandler", cld->PerlHandler);
cfg->setup_env = 0;