dougm 00/05/03 21:52:35
Modified: . Changes
src/modules/perl perl_config.c
Log:
fix core dump triggered by <Perl>do 'foo.pl'</Perl>
Revision Changes Path
1.477 +3 -0 modperl/Changes
Index: Changes
===================================================================
RCS file: /home/cvs/modperl/Changes,v
retrieving revision 1.476
retrieving revision 1.477
diff -u -r1.476 -r1.477
--- Changes 2000/04/27 22:45:30 1.476
+++ Changes 2000/05/04 04:52:34 1.477
@@ -10,6 +10,9 @@
=item 1.23_01-dev
+fix core dump triggered by <Perl>do 'foo.pl'</Perl>,
+thanks to Robert S. Thau for the spot
+
pass $Config{ccflags} to apache for 5.6.0+
fix Apache->httpd_conf, thanks to Will Trillich for the spot
1.95 +1 -1 modperl/src/modules/perl/perl_config.c
Index: perl_config.c
===================================================================
RCS file: /home/cvs/modperl/src/modules/perl/perl_config.c,v
retrieving revision 1.94
retrieving revision 1.95
diff -u -r1.94 -r1.95
--- perl_config.c 2000/04/03 04:48:53 1.94
+++ perl_config.c 2000/05/04 04:52:34 1.95
@@ -1748,7 +1748,7 @@
}
}
- if((hv = GvHV((GV*)val))) {
+ if((hv = GvHV((GV*)val)) && HvKEYS(hv)) {
perl_handle_command_hv(hv, key, parms, config);
}
else if((av = GvAV((GV*)val))) {
