cvs commit: modperl/lib mod_perl.pm

[dougm]

dougm   00/05/16 22:44:26

  Modified:.Changes
   lib  mod_perl.pm
  Log:
  bump version
  
  Revision  ChangesPath
  1.486 +2 -0  modperl/Changes
  
  Index: Changes
  ===
  RCS file: /home/cvs/modperl/Changes,v
  retrieving revision 1.485
  retrieving revision 1.486
  diff -u -r1.485 -r1.486
  --- Changes   2000/05/17 05:25:59 1.485
  +++ Changes   2000/05/17 05:44:25 1.486
  @@ -8,6 +8,8 @@
   
   =over 3
   
  +=item 1.24_01-dev
  +
   =item 1.24 - May 16, 2000
   
   'sub handler : method {}' is now treated as a method handler
  
  
  
  1.47  +1 -1  modperl/lib/mod_perl.pm
  
  Index: mod_perl.pm
  ===
  RCS file: /home/cvs/modperl/lib/mod_perl.pm,v
  retrieving revision 1.46
  retrieving revision 1.47
  diff -u -r1.46 -r1.47
  --- mod_perl.pm   2000/05/17 05:26:01 1.46
  +++ mod_perl.pm   2000/05/17 05:44:26 1.47
  @@ -4,7 +4,7 @@
   use DynaLoader ();
   
   BEGIN {
  -$mod_perl::VERSION = "1.24";
  +$mod_perl::VERSION = "1.2401";
   }
   
   sub boot {
  
  
  

cvs commit: modperl/lib mod_perl.pm

[dougm]

dougm   00/05/16 22:26:02

  Modified:.Changes
   lib  mod_perl.pm
  Log:
  1.24
  
  Revision  ChangesPath
  1.485 +1 -1  modperl/Changes
  
  Index: Changes
  ===
  RCS file: /home/cvs/modperl/Changes,v
  retrieving revision 1.484
  retrieving revision 1.485
  diff -u -r1.484 -r1.485
  --- Changes   2000/05/16 21:52:20 1.484
  +++ Changes   2000/05/17 05:25:59 1.485
  @@ -8,7 +8,7 @@
   
   =over 3
   
  -=item 1.23_01-dev
  +=item 1.24 - May 16, 2000
   
   'sub handler : method {}' is now treated as a method handler
   
  
  
  
  1.46  +1 -1  modperl/lib/mod_perl.pm
  
  Index: mod_perl.pm
  ===
  RCS file: /home/cvs/modperl/lib/mod_perl.pm,v
  retrieving revision 1.45
  retrieving revision 1.46
  diff -u -r1.45 -r1.46
  --- mod_perl.pm   2000/04/21 06:55:36 1.45
  +++ mod_perl.pm   2000/05/17 05:26:01 1.46
  @@ -4,7 +4,7 @@
   use DynaLoader ();
   
   BEGIN {
  -$mod_perl::VERSION = "1.2301";
  +$mod_perl::VERSION = "1.24";
   }
   
   sub boot {
  
  
  

cvs commit: modperl ToDo

[dougm]

dougm   00/05/16 22:14:47

  Modified:.ToDo
  Log:
  todo
  
  Revision  ChangesPath
  1.244 +2 -0  modperl/ToDo
  
  Index: ToDo
  ===
  RCS file: /home/cvs/modperl/ToDo,v
  retrieving revision 1.243
  retrieving revision 1.244
  diff -u -r1.243 -r1.244
  --- ToDo  2000/05/13 01:08:29 1.243
  +++ ToDo  2000/05/17 05:14:47 1.244
  @@ -3,6 +3,8 @@
(well, close to it anyhow)
   ---
   
  +- {get,set}_handlers troubles [Geoffrey Young <[EMAIL PROTECTED]>]
  +
   - remove eg/ directory, it's way out of date and no longer needed now
 with the guide, the books, and piles of Apache::* modules
   
  
  
  

cvs commit: modperl Makefile.PL

[dougm]

dougm   00/05/16 14:53:14

  Modified:.Makefile.PL
  Log:
  make sure full perlpath is used
  
  Revision  ChangesPath
  1.162 +1 -0  modperl/Makefile.PL
  
  Index: Makefile.PL
  ===
  RCS file: /home/cvs/modperl/Makefile.PL,v
  retrieving revision 1.161
  retrieving revision 1.162
  diff -u -r1.161 -r1.162
  --- Makefile.PL   2000/05/12 22:48:07 1.161
  +++ Makefile.PL   2000/05/16 21:53:14 1.162
  @@ -1169,6 +1169,7 @@
   #CCDLFLAGS => "$Config{ccdlflags} $EXTRA_CFLAGS", 
   DEFINE => $EXTRA_CFLAGS, 
   macro   => {
  +PERL => $Config{'perlpath'},
OPCODE_FILE => "src/opcodes.txt",
   APACHE_ROOT => $APACHE_ROOT,
   APACHE_SRC => $APACHE_SRC,
  
  
  

cvs commit: modperl/src/modules/perl mod_perl.c

[dougm]

dougm   00/05/16 14:52:22

  Modified:.Changes
   src/modules/perl mod_perl.c
  Log:
  'sub handler : method {}' is now treated as a method handler
  
  Revision  ChangesPath
  1.484 +2 -0  modperl/Changes
  
  Index: Changes
  ===
  RCS file: /home/cvs/modperl/Changes,v
  retrieving revision 1.483
  retrieving revision 1.484
  diff -u -r1.483 -r1.484
  --- Changes   2000/05/16 13:53:00 1.483
  +++ Changes   2000/05/16 21:52:20 1.484
  @@ -10,6 +10,8 @@
   
   =item 1.23_01-dev
   
  +'sub handler : method {}' is now treated as a method handler
  +
   variable $Apache::Server::ConfigTestOnly is set to 1 if Apache
   is running in configuration test mode (httpd -t)
   [Eric Cholet <[EMAIL PROTECTED]>]
  
  
  
  1.119 +8 -1  modperl/src/modules/perl/mod_perl.c
  
  Index: mod_perl.c
  ===
  RCS file: /home/cvs/modperl/src/modules/perl/mod_perl.c,v
  retrieving revision 1.118
  retrieving revision 1.119
  diff -u -r1.118 -r1.119
  --- mod_perl.c2000/05/16 13:53:01 1.118
  +++ mod_perl.c2000/05/16 21:52:21 1.119
  @@ -1220,8 +1220,15 @@
if (gvp) cv = GvCV(gvp);
   }
   
  -if (cv && SvPOK(cv)) 
  +#ifdef CVf_METHOD
  +if (CvFLAGS(cv) & CVf_METHOD) {
  +is_method = 1;
  +}
  +#endif
  +if (!is_method && (cv && SvPOK(cv))) {
is_method = strnEQ(SvPVX(cv), "$$", 2);
  +}
  +
   MP_TRACE_h(fprintf(stderr, "checking if `%s' is a method...%s\n", 
   sub, (is_method ? "yes" : "no")));
   SvREFCNT_dec(sv);
  
  
  

cvs commit: modperl/Apache Apache.pm

[cholet]

cholet  00/05/16 07:48:40

  Modified:Apache   Apache.pm
  Log:
  document global Apache variables
  
  Revision  ChangesPath
  1.49  +30 -0 modperl/Apache/Apache.pm
  
  Index: Apache.pm
  ===
  RCS file: /home/cvs/modperl/Apache/Apache.pm,v
  retrieving revision 1.48
  retrieving revision 1.49
  diff -u -r1.48 -r1.49
  --- Apache.pm 2000/05/05 08:10:39 1.48
  +++ Apache.pm 2000/05/16 14:48:40 1.49
  @@ -1116,6 +1116,36 @@
   
   =back
   
  +=head1 GLOBAL VARIABLES
  +
  +=over 4
  +
  +=item $Apache::Server::Starting
  +
  +Set to true when the server is starting.
  +
  +=item $Apache::Server::ReStarting
  +
  +Set to true when the server is starting.
  +
  +=item $Apache::Server::ConfigTestOnly
  +
  +Set to true when the server is running in configuration test mode
  +(C).
  +
  +   
  +# don't continue if it's a config test!
  +print("Skipping the  code!\n"),
  +return if $Apache::Server::ConfigTestOnly;
  +   
  +print "Running the  code!\n"
  +# some code here
  +   
  +   
  +
  +
  +=back
  +
   =head1 SEE ALSO
   
   perl(1),
  
  
  

cvs commit: modperl/src/modules/perl mod_perl.c

[cholet]

cholet  00/05/16 06:53:01

  Modified:.Changes
   src/modules/perl mod_perl.c
  Log:
  add $Apache::Server::ConfigTestOnly
  
  Revision  ChangesPath
  1.483 +4 -0  modperl/Changes
  
  Index: Changes
  ===
  RCS file: /home/cvs/modperl/Changes,v
  retrieving revision 1.482
  retrieving revision 1.483
  diff -u -r1.482 -r1.483
  --- Changes   2000/05/13 01:10:52 1.482
  +++ Changes   2000/05/16 13:53:00 1.483
  @@ -10,6 +10,10 @@
   
   =item 1.23_01-dev
   
  +variable $Apache::Server::ConfigTestOnly is set to 1 if Apache
  +is running in configuration test mode (httpd -t)
  +[Eric Cholet <[EMAIL PROTECTED]>]
  +
   add PerlAddVar directive, like PerlSetVar, but uses ap_table_add
   instead of ap_table_set
   
  
  
  
  1.118 +2 -0  modperl/src/modules/perl/mod_perl.c
  
  Index: mod_perl.c
  ===
  RCS file: /home/cvs/modperl/src/modules/perl/mod_perl.c,v
  retrieving revision 1.117
  retrieving revision 1.118
  diff -u -r1.117 -r1.118
  --- mod_perl.c2000/05/13 01:10:53 1.117
  +++ mod_perl.c2000/05/16 13:53:01 1.118
  @@ -735,6 +735,8 @@
   perl_tainting_set(s, cls->PerlTaintCheck);
   (void)GvSV_init("Apache::__SendHeader");
   (void)GvSV_init("Apache::__CurrentCallback");
  +if (ap_configtestonly)
  + GvSV_setiv(GvSV_init("Apache::Server::ConfigTestOnly"), TRUE);
   
   Apache__ServerReStarting(FALSE); /* just for -w */
   Apache__ServerStarting_on();