dougm 01/03/16 22:08:05
Modified: src/modules/perl modperl_cmd.c
Log:
make use of modperl_handler_array_ macros
Revision Changes Path
1.2 +2 -2 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.1
retrieving revision 1.2
diff -u -r1.1 -r1.2
--- modperl_cmd.c 2001/03/16 05:52:29 1.1
+++ modperl_cmd.c 2001/03/17 06:08:05 1.2
@@ -6,13 +6,13 @@
modperl_handler_t *h = modperl_handler_new(p, name);
if (!*handlers) {
- *handlers = apr_array_make(p, 1, sizeof(modperl_handler_t *));
+ *handlers = modperl_handler_array_new(p);
MP_TRACE_d(MP_FUNC, "created handler stack\n");
}
/* XXX parse_handler if Perl is running */
- *(modperl_handler_t **)apr_array_push(*handlers) = h;
+ modperl_handler_array_push(*handlers, h);
MP_TRACE_d(MP_FUNC, "pushed handler: %s\n", h->name);
return NULL;