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};