perl-dev mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From Geoffrey Young <gyo...@laserlink.net>
Subject RE: patch for setting loglevel
Date Mon, 29 Jan 2001 13:12:04 GMT


> -----Original Message-----
> From: Geoffrey Young [mailto:gyoung@laserlink.net]
> Sent: Thursday, January 25, 2001 9:44 AM
> To: 'Doug MacEachern'
> Cc: 'dev@perl.apache.org'
> Subject: RE: patch for setting loglevel
> cool - I'll send along a brief doc patch as soon as the 
> args() thing in
> Apache.pm gets comitted...

since you're punting on args()...

Index: Apache/Apache.pm
===================================================================
RCS file: /home/cvspublic/modperl/Apache/Apache.pm,v
retrieving revision 1.61
diff -u -r1.61 Apache.pm
--- Apache/Apache.pm    2001/01/25 08:10:16     1.61
+++ Apache/Apache.pm    2001/01/29 13:09:37
@@ -714,11 +714,12 @@
 
 =item $s->loglevel
 
-Returns the value of the current LogLevel. This method is added by
+Get or set the value of the current LogLevel. This method is added by
 the Apache::Log module, which needs to be pulled in.
 
     use Apache::Log;
     print "LogLevel = ", $s->loglevel;
+    $s->loglevel(Apache::Log::DEBUG);
 
 If using Perl 5.005+, the following constants are defined (but not
 exported):


Mime
View raw message