Priest, Darryl - BALTO wrote:
Thanks for the quick response, additional information as requested is below.

Cool, please let me know whether this patch solves the problem (you need to apply the patch:


cd modperl-2.0
patch -p0 < patch_itself
rebuild mod_perl from scratch

Index: lib/ModPerl/Code.pm
===================================================================
RCS file: /home/cvs/modperl-2.0/lib/ModPerl/Code.pm,v
retrieving revision 1.92
diff -u -r1.92 Code.pm
--- lib/ModPerl/Code.pm 8 Feb 2003 04:17:11 -0000       1.92
+++ lib/ModPerl/Code.pm 28 Feb 2003 00:22:23 -0000
@@ -512,6 +512,7 @@
     return unless $flags;

     for my $flag (split /\s+/, $flags) {
+        next if /^-/; # skip -foo flags
         my($name, $val) = split '=', $flag;
         $val ||= '';
         $name =~ s/^-D//;

__________________________________________________________________
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



Reply via email to