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) {