cvs commit: modperl-2.0/src/modules/perl modperl_types.h

[stas]

stas        2004/02/09 11:37:38

  Modified:    src/modules/perl modperl_types.h
  Log:
  handler->name may contain other things, besides sub name
  
  Revision  Changes    Path
  1.72      +6 -1      modperl-2.0/src/modules/perl/modperl_types.h
  
  Index: modperl_types.h
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/src/modules/perl/modperl_types.h,v
  retrieving revision 1.71
  retrieving revision 1.72
  diff -u -u -r1.71 -r1.72
  --- modperl_types.h   9 Feb 2004 19:32:42 -0000       1.71
  +++ modperl_types.h   9 Feb 2004 19:37:38 -0000       1.72
  @@ -163,7 +163,12 @@
   struct modperl_handler_t{
       modperl_mgv_t *mgv_obj;
       modperl_mgv_t *mgv_cv;
  -    const char *name; /* original name from .conf if any */
  +    /* could be:
  +     * - a subroutine name
  +     * - a subroutine source code as a string (anon subs)
  +     * - NULL, when .cv is set (anon subs)
  +     */
  +    const char *name; 
       CV *cv;
       U8 flags;
       U32 attrs;