On Mon, 23 Apr 2001, Randy Kobes wrote:
> This patch also includes the t/TEST.win32 patch sent
> earlier to account for the fact that apache_1.3.19 on Win32
> sets the relative server root to the path to the apache binary,
> so that $Apache::Server::CWD in t/docs/startup.pl and t/docs/rl.pl
> points to the path of the apache binary, rather than the mod_perl
> build directory, and subsequently the tests get confused
> since @INC doesn't contain the mod_perl build directory.
did you see my reply to your original message (included below) ?
thanks as always randy!
>From [EMAIL PROTECTED] Tue Apr 17 15:20:39 2001 -0700
Status:
X-Status:
X-Keywords:
Date: Tue, 17 Apr 2001 15:20:39 -0700 (PDT)
From: Doug MacEachern <[EMAIL PROTECTED]>
To: Randy Kobes <[EMAIL PROTECTED]>
cc: [EMAIL PROTECTED]
Subject: Re: relative ServerRoot in Win32
In-Reply-To: <005e01c0c521$32c2e540$443fc8cd@oemcomputer>
Message-ID: <[EMAIL PROTECTED]>
MIME-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
On Sat, 14 Apr 2001, Randy Kobes wrote:
> Hi,
> One of the changes in apache_1.3.19 for Win32 is that the
> relative ServerRoot was changed to root to the path
> of the apache binary. This has the effect of setting
> $Apache::Server::CWD in t/docs/startup.pl and t/docs/rl.pl
> to the path of the apache binary, rather than the mod_perl
> build directory, and subsequently the tests can't be run
> since @INC doesn't contain the mod_perl build directory.
> The following patch against mod_perl-1.25, tested on
> apache_1.3.19 and perl-5.6.1, fixes this by simply
> substituting the mod_perl build directory for
> $Apache::Server::CWD in these two files.
i'd rather not iedit those files. will something like the patch below
solve the problem? thanks randy.
Index: Makefile.PL
===================================================================
RCS file: /home/cvs/modperl/Makefile.PL,v
retrieving revision 1.179
diff -u -r1.179 Makefile.PL
--- Makefile.PL 2001/04/17 21:38:52 1.179
+++ Makefile.PL 2001/04/17 22:20:02
@@ -95,6 +95,7 @@
$Apache::MyConfig::Setup{Apache_Src} ;
my $PWD = cwd;
+$ENV{APACHE_CWD} = $PWD;
$ENV{PERL5LIB} = "$PWD/lib";
my %SSL = (
Index: t/docs/startup.pl
===================================================================
RCS file: /home/cvs/modperl/t/docs/startup.pl,v
retrieving revision 1.40
diff -u -r1.40 startup.pl
--- t/docs/startup.pl 2000/12/23 00:32:21 1.40
+++ t/docs/startup.pl 2001/04/17 22:20:08
@@ -5,6 +5,10 @@
}
BEGIN {
+ $Apache::Server::CWD = $ENV{APACHE_CWD} if $ENV{APACHE_CWD};
+}
+
+BEGIN {
#./blib/lib:./blib/arch
use ExtUtils::testlib;
Index: t/conf/httpd.conf-dist
===================================================================
RCS file: /home/cvs/modperl/t/conf/httpd.conf-dist,v
retrieving revision 1.32
diff -u -r1.32 httpd.conf-dist
--- t/conf/httpd.conf-dist 2000/09/26 16:55:41 1.32
+++ t/conf/httpd.conf-dist 2001/04/17 22:20:14
@@ -55,7 +55,7 @@
#mod_perl stuff
-PerlPassEnv TERM EDITOR NOCHANCE USER PERL5LIB
+PerlPassEnv TERM EDITOR NOCHANCE USER PERL5LIB APACHE_CWD
PerlSetEnv KeyForPerlSetEnv OK
PerlSetVar KeyForPerlSetVar OK
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
