On 15 Sep 2000, Bjørn Ola Smievoll wrote:
> I need to retrieve the value of the ErrorLog directive (i.e. the path
> & filename of the error_log), but I can't find a way to do it with
> mod_perl. (The C api equivalent is the error_fname field in the
> server_rec struct).
this patch should work. can you tell me why you need it so i can decide
if this should be added to the distribution?
Index: src/modules/perl/Server.xs
===================================================================
RCS file: /home/cvs/modperl/src/modules/perl/Server.xs,v
retrieving revision 1.6
diff -u -r1.6 Server.xs
--- src/modules/perl/Server.xs 1999/08/20 08:34:43 1.6
+++ src/modules/perl/Server.xs 2000/09/25 20:12:57
@@ -135,6 +135,16 @@
# char *names; /* Wildcarded names for HostAlias servers */
# char *virthost; /* The name given in <VirtualHost> */
+char *
+error_fname(server)
+ Apache::Server server
+
+ CODE:
+ RETVAL = server->error_fname;
+
+ OUTPUT:
+ RETVAL
+
int
timeout(server, set=0)
Apache::Server server
