stas 2002/12/08 23:28:02 Modified: src/modules/perl modperl_config.c Log: call modperl_trace_level_set() to pick MOD_PERL_TRACE env var if any only once, which is for the main server. don't repeat the call for vhosts. it'd be much better to move it to the modperl_register_hooks function, but we have no server object there. Revision Changes Path 1.59 +4 -2 modperl-2.0/src/modules/perl/modperl_config.c Index: modperl_config.c =================================================================== RCS file: /home/cvs/modperl-2.0/src/modules/perl/modperl_config.c,v retrieving revision 1.58 retrieving revision 1.59 diff -u -r1.58 -r1.59 --- modperl_config.c 6 Dec 2002 04:22:30 -0000 1.58 +++ modperl_config.c 9 Dec 2002 07:28:02 -0000 1.59 @@ -166,8 +166,10 @@ /* give a chance to MOD_PERL_TRACE env var to set PerlTrace. This * place is the earliest point in mod_perl configuration - * parsing */ - modperl_trace_level_set(s, NULL); + * parsing, when we have the server object */ + if (!s->is_virtual) { + modperl_trace_level_set(s, NULL); + } #ifdef USE_ITHREADS