You are viewing a plain text version of this content. The canonical link for it is here.
Posted to test-cvs@httpd.apache.org by st...@apache.org on 2003/12/20 08:18:47 UTC
cvs commit: httpd-test/perl-framework/Apache-Test/lib/Apache TestConfig.pm
stas 2003/12/19 23:18:47
Modified: perl-framework/Apache-Test/lib/Apache TestConfig.pm
Log:
yet another fix for -port (when passed via %Apache::TestConfig::Argv)
Revision Changes Path
1.189 +2 -2 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.188
retrieving revision 1.189
diff -u -u -r1.188 -r1.189
--- TestConfig.pm 10 Dec 2003 02:26:30 -0000 1.188
+++ TestConfig.pm 20 Dec 2003 07:18:47 -0000 1.189
@@ -1352,8 +1352,8 @@
my @reasons = ();
my $vars = $self->{vars};
- if ($conf_opts->{port}) {
- push @reasons, "'-port $conf_opts->{port}' requires reconfiguration";
+ if (my $port = $conf_opts->{port} || $vars->{port}) {
+ push @reasons, "'-port $port' requires reconfiguration";
}
my $exe = $vars->{apxs} || $vars->{httpd};