dougm 01/11/14 17:30:46 Modified: src/modules/perl mod_perl.c Log: save globals before populating %ENV vars Revision Changes Path 1.94 +2 -2 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.93 retrieving revision 1.94 diff -u -r1.93 -r1.94 --- mod_perl.c 2001/11/01 23:50:32 1.93 +++ mod_perl.c 2001/11/15 01:30:45 1.94 @@ -524,6 +524,8 @@ } #endif + modperl_perl_global_request_save(aTHX_ r); + /* default is +SetupEnv, skip if PerlOption -SetupEnv */ if (MpDirSETUP_ENV(dcfg) || !MpDirSeenSETUP_ENV(dcfg)) { modperl_env_request_populate(aTHX_ r); @@ -532,8 +534,6 @@ if (MpDirPARSE_HEADERS(dcfg)) { rcfg->wbucket.header_parse = 1; } - - modperl_perl_global_request_save(aTHX_ r); h_stdout = modperl_io_tie_stdout(aTHX_ r); h_stdin = modperl_io_tie_stdin(aTHX_ r);
- cvs commit: modperl-2.0/src/modules/perl mod_perl.c dougm
- cvs commit: modperl-2.0/src/modules/perl mod_perl.c dougm
- cvs commit: modperl-2.0/src/modules/perl mod_perl.c dougm
- cvs commit: modperl-2.0/src/modules/perl mod_perl.c dougm
- cvs commit: modperl-2.0/src/modules/perl mod_perl.c dougm
- cvs commit: modperl-2.0/src/modules/perl mod_perl.c dougm
- cvs commit: modperl-2.0/src/modules/perl mod_perl.c dougm
- cvs commit: modperl-2.0/src/modules/perl mod_perl.c dougm
- cvs commit: modperl-2.0/src/modules/perl mod_perl.c dougm
- cvs commit: modperl-2.0/src/modules/perl mod_perl.c dougm
- cvs commit: modperl-2.0/src/modules/perl mod_perl.c dougm
- cvs commit: modperl-2.0/src/modules/perl mod_perl.c dougm
- cvs commit: modperl-2.0/src/modules/perl mod_perl.c dougm
- cvs commit: modperl-2.0/src/modules/perl mod_perl.c dougm
- cvs commit: modperl-2.0/src/modules/perl mod_perl.c dougm
- cvs commit: modperl-2.0/src/modules/perl mod_perl.c stas
- cvs commit: modperl-2.0/src/modules/perl mod_perl.c dougm
- cvs commit: modperl-2.0/src/modules/perl mod_perl.c dougm