dougm 01/10/06 12:43:40
Modified: src/modules/perl mod_perl.c modperl_cmd.c modperl_cmd.h
Log:
implement PerlInitHandler
Revision Changes Path
1.86 +1 -0 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.85
retrieving revision 1.86
diff -u -r1.85 -r1.86
--- mod_perl.c 2001/09/28 19:51:40 1.85
+++ mod_perl.c 2001/10/06 19:43:40 1.86
@@ -415,6 +415,7 @@
MP_CMD_SRV_ITERATE("PerlModule", modules, "PerlModule"),
MP_CMD_SRV_ITERATE("PerlRequire", requires, "PerlRequire"),
MP_CMD_DIR_ITERATE("PerlOptions", options, "Perl Options"),
+ MP_CMD_DIR_ITERATE("PerlInitHandler", init_handlers, "Subroutine name"),
MP_CMD_DIR_TAKE2("PerlSetVar", set_var, "PerlSetVar"),
MP_CMD_DIR_ITERATE2("PerlAddVar", add_var, "PerlAddVar"),
#ifdef MP_TRACE
1.13 +8 -0 modperl-2.0/src/modules/perl/modperl_cmd.c
Index: modperl_cmd.c
===================================================================
RCS file: /home/cvs/modperl-2.0/src/modules/perl/modperl_cmd.c,v
retrieving revision 1.12
retrieving revision 1.13
diff -u -r1.12 -r1.13
--- modperl_cmd.c 2001/09/28 19:51:40 1.12
+++ modperl_cmd.c 2001/10/06 19:43:40 1.13
@@ -116,6 +116,14 @@
return NULL;
}
+MP_CMD_SRV_DECLARE(init_handlers)
+{
+ if (parms->path) {
+ return modperl_cmd_header_parser_handlers(parms, mconfig, arg);
+ }
+
+ return modperl_cmd_post_read_request_handlers(parms, mconfig, arg);
+}
#ifdef MP_COMPAT_1X
1.15 +1 -0 modperl-2.0/src/modules/perl/modperl_cmd.h
Index: modperl_cmd.h
===================================================================
RCS file: /home/cvs/modperl-2.0/src/modules/perl/modperl_cmd.h,v
retrieving revision 1.14
retrieving revision 1.15
diff -u -r1.14 -r1.15
--- modperl_cmd.h 2001/09/28 19:51:40 1.14
+++ modperl_cmd.h 2001/10/06 19:43:40 1.15
@@ -23,6 +23,7 @@
MP_CMD_SRV_DECLARE2(set_var);
MP_CMD_SRV_DECLARE2(add_var);
MP_CMD_SRV_DECLARE(options);
+MP_CMD_SRV_DECLARE(init_handlers);
#ifdef MP_COMPAT_1X