stas 2003/04/06 18:56:55
Modified: src/modules/perl mod_perl.c
. Changes
Log:
<SERVER_ROOT> and <SERVER_ROOT>/lib/perl are now added to @INC, just
like mod_perl 1.0 with MP_COMPAT_1X=1
Revision Changes Path
1.168 +7 -0 modperl-2.0/src/modules/perl/mod_perl.c
Index: mod_perl.c
===================================================================
RCS file: /home/cvs/modperl-2.0/src/modules/perl/mod_perl.c,v
retrieving revision 1.167
retrieving revision 1.168
diff -u -r1.167 -r1.168
--- mod_perl.c 7 Apr 2003 01:39:51 -0000 1.167
+++ mod_perl.c 7 Apr 2003 01:56:54 -0000 1.168
@@ -207,6 +207,13 @@
);
#endif
+#ifdef MP_COMPAT_1X
+ av_push(GvAV(PL_incgv),
+ newSVpv(ap_server_root_relative(p, ""), 0));
+ av_push(GvAV(PL_incgv),
+ newSVpv(ap_server_root_relative(p, "lib/perl"), 0));
+#endif /* MP_COMPAT_1X */
+
if (!modperl_config_apply_PerlRequire(s, scfg, perl, p)) {
exit(1);
}
1.164 +3 -0 modperl-2.0/Changes
Index: Changes
===================================================================
RCS file: /home/cvs/modperl-2.0/Changes,v
retrieving revision 1.163
retrieving revision 1.164
diff -u -r1.163 -r1.164
--- Changes 6 Apr 2003 23:49:46 -0000 1.163
+++ Changes 7 Apr 2003 01:56:55 -0000 1.164
@@ -10,6 +10,9 @@
=item 1.99_09-dev
+<SERVER_ROOT> and <SERVER_ROOT>/lib/perl are now added to @INC, just
+like mod_perl 1.0 with MP_COMPAT_1X=1 (currently enabled by default).
+
The Perl-5.8.0 crypt() workaround is now used only if 5.8.0 is used,
since 5.8.1-tobe/5.9.0-tobe(blead-perl) won't compile with
it. [Geoffrey Young]
