cvs commit: modperl-2.0/src/modules/perl mod_perl.c modperl_cmd.c modperl_cmd.h

[dougm]

dougm       01/09/27 12:35:34

  Modified:    src/modules/perl mod_perl.c modperl_cmd.c modperl_cmd.h
  Log:
  add PerlSendHeader directive for backwards compat
  
  Revision  Changes    Path
  1.76      +2 -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.75
  retrieving revision 1.76
  diff -u -r1.75 -r1.76
  --- mod_perl.c        2001/09/27 19:04:38     1.75
  +++ mod_perl.c        2001/09/27 19:35:34     1.76
  @@ -426,6 +426,8 @@
                        "Scope of a Perl interpreter"),
   #endif
   #ifdef MP_COMPAT_1X
  +    MP_CMD_DIR_FLAG("PerlSendHeader", send_header,
  +                    "Tell mod_perl to scan output for HTTP headers"),
       MP_CMD_DIR_ITERATE("PerlHandler", response_handlers,
                          "Subroutine name"),
       MP_CMD_SRV_FLAG("PerlTaintCheck", taint_check,
  
  
  
  1.10      +6 -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.9
  retrieving revision 1.10
  diff -u -r1.9 -r1.10
  --- modperl_cmd.c     2001/09/27 15:56:44     1.9
  +++ modperl_cmd.c     2001/09/27 19:35:34     1.10
  @@ -105,6 +105,12 @@
       return NULL;
   }
   
  +MP_CMD_SRV_DECLARE_FLAG(send_header)
  +{
  +    char *arg = flag_on ? "+ParseHeaders" : "-ParseHeaders";
  +    return modperl_cmd_options(parms, mconfig, arg);
  +}
  +
   #endif /* MP_COMPAT_1X */
   
   #ifdef USE_ITHREADS
  
  
  
  1.12      +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.11
  retrieving revision 1.12
  diff -u -r1.11 -r1.12
  --- modperl_cmd.h     2001/09/27 15:56:44     1.11
  +++ modperl_cmd.h     2001/09/27 19:35:34     1.12
  @@ -27,6 +27,7 @@
   
   MP_CMD_SRV_DECLARE_FLAG(taint_check);
   MP_CMD_SRV_DECLARE_FLAG(warn);
  +MP_CMD_SRV_DECLARE_FLAG(send_header);
   
   #endif /* MP_COMPAT_1X */