You are viewing a plain text version of this content. The canonical link for it is here.
Posted to modperl-cvs@perl.apache.org by do...@apache.org on 2002/06/06 19:32:51 UTC
cvs commit: modperl-2.0/src/modules/perl modperl_handler.c
dougm 2002/06/06 10:32:51
Modified: src/modules/perl modperl_handler.c
Log:
add support for Perl*Handler +Apache::Foo
Revision Changes Path
1.11 +14 -0 modperl-2.0/src/modules/perl/modperl_handler.c
Index: modperl_handler.c
===================================================================
RCS file: /home/cvs/modperl-2.0/src/modules/perl/modperl_handler.c,v
retrieving revision 1.10
retrieving revision 1.11
diff -u -r1.10 -r1.11
--- modperl_handler.c 21 Oct 2001 22:11:34 -0000 1.10
+++ modperl_handler.c 6 Jun 2002 17:32:51 -0000 1.11
@@ -5,6 +5,20 @@
modperl_handler_t *handler =
(modperl_handler_t *)apr_pcalloc(p, sizeof(*handler));
+ switch (*name) {
+ case '+':
+ ++name;
+ MpHandlerAUTOLOAD_On(handler);
+ break;
+ case '-':
+ ++name;
+ /* XXX: currently a noop; should disable autoload of given handler
+ * if PerlOptions +AutoLoad is configured
+ */
+ MpHandlerAUTOLOAD_Off(handler);
+ break;
+ }
+
handler->name = name;
MP_TRACE_h(MP_FUNC, "new handler %s\n", handler->name);