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;
  
  
  

Reply via email to