httpd-test-cvs mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From do...@apache.org
Subject cvs commit: httpd-test/perl-framework/Apache-Test/lib/Apache TestRun.pm
Date Sat, 22 Dec 2001 02:28:27 GMT
dougm       01/12/21 18:28:27

  Modified:    perl-framework/Apache-Test/lib/Apache TestRun.pm
  Log:
  update remote_addr var in the config cache if it has changed
  
  Revision  Changes    Path
  1.76      +8 -1      httpd-test/perl-framework/Apache-Test/lib/Apache/TestRun.pm
  
  Index: TestRun.pm
  ===================================================================
  RCS file: /home/cvs/httpd-test/perl-framework/Apache-Test/lib/Apache/TestRun.pm,v
  retrieving revision 1.75
  retrieving revision 1.76
  diff -u -r1.75 -r1.76
  --- TestRun.pm	2001/12/14 18:12:25	1.75
  +++ TestRun.pm	2001/12/22 02:28:27	1.76
  @@ -349,12 +349,19 @@
       my $save = \$self->{conf_opts}->{save};
       $self->configure_opts($save);
   
  +    my $config = $self->{test_config};
       unless ($$save) {
  +        my $addr = \$config->{vars}->{remote_addr};
  +        my $remote_addr = $config->our_remote_addr;
  +        unless ($$addr eq $remote_addr) {
  +            warning "local ip address has changed, updating config cache";
  +            $$addr = $remote_addr;
  +        }
           #update minor changes to cached config
           #without complete regeneration
           #for example this allows switching between
           #'t/TEST' and 't/TEST -ssl'
  -        $self->{test_config}->sync_vars(qw(scheme proxy));
  +        $config->sync_vars(qw(scheme proxy remote_addr));
           return;
       }
   
  
  
  

Mime
View raw message