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;