Hi,
   I was having problems on Win32 when building mod_perl-2 (with
the latest cvs modperl-2/httpd-2 sources) with the generated
t/conf/httpd.conf - some needed modules weren't being loaded (eg,
log_config_module, for the TransferLog directive), and also the
file specifying the TypesConfig directive was getting mangled
when substituting for @ServerRoot@. The following diff fixes
those problems (this is on ActivePerl 631, with WinXP).

best regards,
randy

===================================================

Index: Apache-Test/lib/Apache/TestConfigParse.pm
===================================================================
RCS file: 
/home/cvspublic/httpd-test/perl-framework/Apache-Test/lib/Apache/TestConfigParse.pm,v
retrieving revision 1.22
diff -u -r1.22 TestConfigParse.pm
--- Apache-Test/lib/Apache/TestConfigParse.pm   7 Apr 2002 04:18:02 -0000       1.22
+++ Apache-Test/lib/Apache/TestConfigParse.pm   20 Apr 2002 05:05:33 -0000
@@ -47,6 +47,10 @@
 sub server_file_rel2abs {
     my($self, $file, $base) = @_;

+    if (WIN32) {
+      return catfile $self->{httpd_basedir}, $file;
+    }
+
     $base ||= $self->{inherit_config}->{ServerRoot};

     unless ($base) {
@@ -90,7 +94,8 @@

     for my $args (@{ $c->{$directive} }) {
         my $modname = $args->[0];
-        my $file = $self->server_file_rel2abs($args->[1]);
+        my $file = WIN32 ? catfile $self->{httpd_basedir}, $args->[1] :
+         $self->server_file_rel2abs($args->[1]);

         unless (-e $file) {
             debug "$file does not exist, skipping LoadModule";

=====================================================================



---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to