stas 2003/12/19 23:30:43
Modified: perl-framework/Apache-Test/lib/Apache TestConfig.pm
Log:
%Apache::TestConfig::Argv is the second place to look at, not $args - which
always
contains port
Revision Changes Path
1.190 +1 -1
httpd-test/perl-framework/Apache-Test/lib/Apache/TestConfig.pm
Index: TestConfig.pm
===================================================================
RCS file:
/home/cvs/httpd-test/perl-framework/Apache-Test/lib/Apache/TestConfig.pm,v
retrieving revision 1.189
retrieving revision 1.190
diff -u -u -r1.189 -r1.190
--- TestConfig.pm 20 Dec 2003 07:18:47 -0000 1.189
+++ TestConfig.pm 20 Dec 2003 07:30:43 -0000 1.190
@@ -1352,7 +1352,7 @@
my @reasons = ();
my $vars = $self->{vars};
- if (my $port = $conf_opts->{port} || $vars->{port}) {
+ if (my $port = $conf_opts->{port} || $Apache::TestConfig::Argv{port}) {
push @reasons, "'-port $port' requires reconfiguration";
}