Cameron Simpson wrote: > > Could I ask that someone test making the Apache mod_perl module > against it? I tried against the then-current development perl > a few weeks ago and had no joy. This module's fairly important to > a number of people and seems like a worthwhile pretest. We have been using mod_perl 1.21 with Perl 5.005_63 and HTML::Embperl 1.2.1 for three weeks in a development/demo environment. I made a couple of hacks (patch below) to get it compiled. I'm not sure about the effect of commenting out the saving of GvHV(siggv) (aka %SIG, I believe). Our app does not touch %SIG. -John -- John Tobey, late nite hacker <jtobey@john-edwin-tobey.org> \\\ /// ]]] With enough bugs, all eyes are shallow. [[[ /// \\\ --- apache_1.3.11/src/modules/perl/mod_perl.c~ Tue Feb 1 21:15:05 2000 +++ apache_1.3.11/src/modules/perl/mod_perl.c Tue Feb 1 22:23:03 2000 @@ -780,9 +780,9 @@ } } - if (siggv) { + /* if (siggv) { save_hptr(&GvHV(siggv)); - } + }*/ if (endav) { save_aptr(&endav); --- apache_1.3.11/src/modules/perl/mod_perl.h~ Tue Feb 1 21:15:05 2000 +++ apache_1.3.11/src/modules/perl/mod_perl.h Tue Feb 1 22:30:40 2000 @@ -1,3 +1,9 @@ +#define PERL_POLLUTE +#define perl_eval_pv Perl_eval_pv +#define perl_eval_sv Perl_eval_sv +#define perl_call_sv Perl_call_sv +#define perl_call_method Perl_call_method + #ifdef WIN32 #define NO_PERL_CHILD_INIT #define NO_PERL_CHILD_EXIT --- HTML-Embperl-1.2.1/embperl.h~ Wed Jan 5 01:49:46 2000 +++ HTML-Embperl-1.2.1/embperl.h Tue Feb 1 23:00:26 2000 @@ -1,3 +1,10 @@ +#define perl_eval_pv Perl_eval_pv +#define perl_eval_sv Perl_eval_sv +#define perl_call_sv Perl_call_sv +#define perl_call_method Perl_call_method + + + /*################################################################################### # # Embperl - Copyright (c) 1997-1999 Gerald Richter / ECOSThread Next