dougm       01/03/15 22:57:43

  Modified:    src/modules/perl modperl_callback.c
  Log:
  thinking
  
  Revision  Changes    Path
  1.34      +4 -4      modperl-2.0/src/modules/perl/modperl_callback.c
  
  Index: modperl_callback.c
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/src/modules/perl/modperl_callback.c,v
  retrieving revision 1.33
  retrieving revision 1.34
  diff -u -r1.33 -r1.34
  --- modperl_callback.c        2001/03/16 06:41:46     1.33
  +++ modperl_callback.c        2001/03/16 06:57:42     1.34
  @@ -139,10 +139,6 @@
       }
   #endif
   
  -    MP_TRACE_h(MP_FUNC, "running %d %s handlers\n",
  -               av->nelts, desc);
  -    handlers = (modperl_handler_t **)av->elts;
  -
       switch (type) {
         case MP_HANDLER_TYPE_PER_DIR:
         case MP_HANDLER_TYPE_PER_SRV:
  @@ -188,6 +184,10 @@
             }
             break;
       };
  +
  +    MP_TRACE_h(MP_FUNC, "running %d %s handlers\n",
  +               av->nelts, desc);
  +    handlers = (modperl_handler_t **)av->elts;
   
       for (i=0; i<av->nelts; i++) {
           if ((status = modperl_callback(aTHX_ handlers[i], p, s, av_args)) != OK) {
  
  
  

Reply via email to