cvs commit: modperl-2.0/lib/ModPerl Code.pm

[dougm]

dougm       01/04/29 21:37:01

  Modified:    lib/ModPerl Code.pm
  Log:
  integrate modperl_global module
  
  Revision  Changes    Path
  1.60      +3 -2      modperl-2.0/lib/ModPerl/Code.pm
  
  Index: Code.pm
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/lib/ModPerl/Code.pm,v
  retrieving revision 1.59
  retrieving revision 1.60
  diff -u -r1.59 -r1.60
  --- Code.pm   2001/04/19 17:42:16     1.59
  +++ Code.pm   2001/04/30 04:37:00     1.60
  @@ -93,7 +93,8 @@
   my %flags = (
       Srv => ['NONE', @ithread_opts, qw(ENABLED AUTOLOAD MERGE_HANDLERS),
               @hook_flags, 'UNSET'],
  -    Dir => [qw(NONE SEND_HEADER SETUP_ENV MERGE_HANDLERS UNSET)],
  +    Dir => [qw(NONE SEND_HEADER SETUP_ENV MERGE_HANDLERS GLOBAL_REQUEST UNSET)],
  +    Req => [qw(NONE SET_GLOBAL_REQUEST)],
       Interp => [qw(NONE IN_USE PUTBACK CLONED BASE)],
       Handler => [qw(NONE PARSED METHOD OBJECT ANON AUTOLOAD DYNAMIC)],
   );
  @@ -521,7 +522,7 @@
   );
   
   my @c_src_names = qw(interp tipool log config cmd options callback handler
  -                     gtop util filter bucket mgv pcw);
  +                     gtop util filter bucket mgv pcw global);
   my @g_c_names = map { "modperl_$_" } qw(hooks directives flags xsinit);
   my @c_names   = ('mod_perl', (map "modperl_$_", @c_src_names));
   sub c_files { [map { "$_.c" } @c_names, @g_c_names] }