You are viewing a plain text version of this content. The canonical link for it is here.
Posted to modperl-cvs@perl.apache.org by do...@apache.org on 2001/01/25 08:43:05 UTC

cvs commit: modperl/src/modules/perl Log.xs

dougm       01/01/24 23:43:05

  Modified:    .        Changes ToDo
               src/modules/perl Log.xs
  Log:
  Apache::Server->loglevel can now be modified
  
  Revision  Changes    Path
  1.572     +3 -0      modperl/Changes
  
  Index: Changes
  ===================================================================
  RCS file: /home/cvs/modperl/Changes,v
  retrieving revision 1.571
  retrieving revision 1.572
  diff -u -r1.571 -r1.572
  --- Changes	2001/01/25 07:10:33	1.571
  +++ Changes	2001/01/25 07:43:05	1.572
  @@ -10,6 +10,9 @@
   
   =item 1.24_02-dev
   
  +Apache::Server->loglevel can now be modified
  +[Geoffrey Young <gy...@laserlink.net>]
  +
   use unsigned short rather than short for Apache::Server->port
   thanks to Richard L. Goerwitz for the spot
   
  
  
  
  1.268     +0 -3      modperl/ToDo
  
  Index: ToDo
  ===================================================================
  RCS file: /home/cvs/modperl/ToDo,v
  retrieving revision 1.267
  retrieving revision 1.268
  diff -u -r1.267 -r1.268
  --- ToDo	2001/01/25 07:10:35	1.267
  +++ ToDo	2001/01/25 07:43:05	1.268
  @@ -25,9 +25,6 @@
   - From: Geoffrey Young <gy...@laserlink.net>
     Subject: FW: bug in mod_perl-1.24 & request->args & request->content
   
  -- From: Geoffrey Young <gy...@laserlink.net>
  -  Subject: patch for setting loglevel
  -
   - -- post 1.25 --
   
   - From: JR Mayberry <jr...@e-vend.net>
  
  
  
  1.12      +3 -2      modperl/src/modules/perl/Log.xs
  
  Index: Log.xs
  ===================================================================
  RCS file: /home/cvs/modperl/src/modules/perl/Log.xs,v
  retrieving revision 1.11
  retrieving revision 1.12
  diff -u -r1.11 -r1.12
  --- Log.xs	2000/03/31 17:07:24	1.11
  +++ Log.xs	2001/01/25 07:43:05	1.12
  @@ -1,4 +1,5 @@
   #include "mod_perl.h"
  +#include "mod_perl_xs.h"
   
   #if MODULE_MAGIC_NUMBER >= MMN_132
   #define HAVE_LOG_RERROR 1
  @@ -210,11 +211,11 @@
   #endif
   
   int
  -loglevel(server)
  +loglevel(server, ...)
       Apache::Server	server
   
       CODE:
  -    RETVAL = server->loglevel;
  +    get_set_IV(server->loglevel); 
   
       OUTPUT:
       RETVAL