dougm 02/05/22 20:07:28
Modified: . Changes
src/modules/perl mod_perl.h
t/docs startup.pl
Log:
make sure DynaLoader is loaded before XSLoader to workaround possible
segv when using mod_perl as a dso with perl 5.6.1
Revision Changes Path
1.643 +3 -0 modperl/Changes
Index: Changes
===================================================================
RCS file: /home/cvs/modperl/Changes,v
retrieving revision 1.642
retrieving revision 1.643
diff -u -r1.642 -r1.643
--- Changes 23 May 2002 02:52:15 -0000 1.642
+++ Changes 23 May 2002 03:07:27 -0000 1.643
@@ -10,6 +10,9 @@
=item 1.26_01-dev
+make sure DynaLoader is loaded before XSLoader to workaround possible
+segv when using mod_perl as a dso with perl 5.6.1
+
autoset PERL_USELARGEFILES=0 if needed
fix taint issues with bleedperl
1.114 +1 -0 modperl/src/modules/perl/mod_perl.h
Index: mod_perl.h
===================================================================
RCS file: /home/cvs/modperl/src/modules/perl/mod_perl.h,v
retrieving revision 1.113
retrieving revision 1.114
diff -u -r1.113 -r1.114
--- mod_perl.h 24 Mar 2002 23:01:33 -0000 1.113
+++ mod_perl.h 23 May 2002 03:07:27 -0000 1.114
@@ -1192,6 +1192,7 @@
/* perl_config.c */
#define require_Apache(s) \
+ perl_require_module("DynaLoader", s); \
perl_require_module("Apache", s)
char *mod_perl_auth_name(request_rec *r, char *val);
1.44 +1 -0 modperl/t/docs/startup.pl
Index: startup.pl
===================================================================
RCS file: /home/cvs/modperl/t/docs/startup.pl,v
retrieving revision 1.43
retrieving revision 1.44
diff -u -r1.43 -r1.44
--- startup.pl 15 May 2002 18:01:21 -0000 1.43
+++ startup.pl 23 May 2002 03:07:27 -0000 1.44
@@ -25,6 +25,7 @@
}; $@='' if $@;
}
+use Socket (); #test DynaLoader vs. XSLoader workaroud
use Apache ();
use Apache::Registry ();
unless ($INC{'Apache.pm'} =~ /blib/) {