The only missing thing to make the picture complete is PERL5LIB, which bites us back, so we need to instrument Apache-Test to be able to set PerlSwitches -I for us (or <Perl>use lib</Perl> for mp1).

how about this?


PerlSwitches [EMAIL PROTECTED]@

might not want to die for unrecognized variables anymore, though.

--Geoff
Index: lib/Apache/TestConfig.pm
===================================================================
RCS file: 
/home/cvspublic/httpd-test/perl-framework/Apache-Test/lib/Apache/TestConfig.pm,v
retrieving revision 1.181
diff -u -r1.181 TestConfig.pm
--- lib/Apache/TestConfig.pm    21 Oct 2003 22:09:41 -0000      1.181
+++ lib/Apache/TestConfig.pm    30 Oct 2003 04:57:10 -0000
@@ -912,11 +912,14 @@
     my $file = $Apache::TestConfig::File
         ? "in file $Apache::TestConfig::File" : '';
 
+    # @variable@ substitution
+    # look first in the stored config
+    # then in %ENV
     s[@(\w+)@]
      [ my $key = lc $1;
-      exists $self->{vars}->{$key}
-      ? $self->{vars}->{$key}
-      : die "invalid token: [EMAIL PROTECTED]@ $file\n";
+      exists $self->{vars}->{$key} ? $self->{vars}->{$key} :
+      exists $ENV{$1}              ? $ENV{$1}              :
+      die "invalid token: [EMAIL PROTECTED]@ $file\n";
      ]ge;
 }
 

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

Reply via email to