cvs commit: modperl-2.0/src/modules/perl mod_perl.c

[stas]

stas        2003/10/22 18:09:21

  Modified:    src/modules/perl mod_perl.c
  Log:
  better tracing
  
  Revision  Changes    Path
  1.196     +4 -1      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.195
  retrieving revision 1.196
  diff -u -u -r1.195 -r1.196
  --- mod_perl.c        23 Oct 2003 01:07:58 -0000      1.195
  +++ mod_perl.c        23 Oct 2003 01:09:21 -0000      1.196
  @@ -348,8 +348,11 @@
           base_server = modperl_global_get_server_rec();
       }
   
  +    MP_TRACE_i(MP_FUNC, "Init vhost %s: s=0x%lx, base_s=0x%lx\n",
  +               vhost, s, base_server);
  +    
       if (base_server == s) {
  -        MP_TRACE_i(MP_FUNC, "skipping vhost init for base server %s\n",
  +        MP_TRACE_i(MP_FUNC, "base server is not vhost, skipping %s\n",
                      vhost);
           return OK;
       }