Geoffrey Young <[EMAIL PROTECTED]> wrote:
>hi all...
>
> I've hunted around and can't find a method that retrieves the
>LogLevel directive setting. Is there one? If not, is there a record
>somewhere that can make this available, maybe through Apache::Server?
Looks like it is in the C API - but don't see a documented reference
to it in the Perl API.
The following might get you started (in src/modules/perl/Server.xs):
int
loglevel(server)
Apache::Server server
CODE:
RETVAL = server->loglevel;
OUTPUT:
RETVAL
I couldn't find any mention of loglevel in the .xs files in such a way
that Perl code would have access to it. I've also never coded with XS,
so the above is based on the pattern established in Server.xs.
------------------------------------+-----------------------------------------
James Smith - [EMAIL PROTECTED] | http://www.jamesmith.com/
[EMAIL PROTECTED] | http://sourcegarden.org/
[EMAIL PROTECTED] | http://cis.tamu.edu/systems/opensystems/
------------------------------------+------------------------------------------