gozer wants to use PERL5LIB set from the shell
- this patch respects the previous value of PERL5LIB which was
originally overriden
Index: Apache-Test/lib/Apache/TestRun.pm
===================================================================
RCS file:
/home/cvs/httpd-test/perl-framework/Apache-Test/lib/Apache/TestRun.pm,v
retrieving revision 1.51
diff -u -r1.51 TestRun.pm
--- Apache-Test/lib/Apache/TestRun.pm 2001/09/06 05:02:51 1.51
+++ Apache-Test/lib/Apache/TestRun.pm 2001/09/20 10:52:57
@@ -575,7 +575,11 @@
}
sub set_perl5lib {
- $ENV{PERL5LIB} = join $Config{path_sep}, shift->test_inc();
+ my $path = join $Config{path_sep}, shift->test_inc();
+ # fixup PERL5LIB respecting any previous user settings
+ $ENV{PERL5LIB} = exists $ENV{PERL5LIB}
+ ? join $Config{path_sep}, $path
+ : $path;
}
sub set_perldb_opts {
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
