in mp 1.x land, <Perl> sections used to set $0 to the name of the configuration file it was in.
Following patches does just that for 2.x
there is one problem with it. You need to restore it to its original value after Perl sections are over, no? How did it work in mp1?
Index: src/modules/perl/modperl_cmd.c
===================================================================
RCS file: /home/cvs/modperl-2.0/src/modules/perl/modperl_cmd.c,v
retrieving revision 1.50
diff -u -I$Id: -r1.50 modperl_cmd.c
--- src/modules/perl/modperl_cmd.c 13 Nov 2003 21:03:46 -0000 1.50
+++ src/modules/perl/modperl_cmd.c 14 Nov 2003 17:40:29 -0000
@@ -409,6 +409,8 @@
arg, NULL);
}
+ sv_setpv(get_sv("0", TRUE), parms->directive->filename);
+
__________________________________________________________________ Stas Bekman JAm_pH ------> Just Another mod_perl Hacker http://stason.org/ mod_perl Guide ---> http://perl.apache.org mailto:[EMAIL PROTECTED] http://use.perl.org http://apacheweek.com http://modperlbook.org http://apache.org http://ticketmaster.com
--------------------------------------------------------------------- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
