Return-Path: Delivered-To: apmail-httpd-test-cvs-archive@httpd.apache.org Received: (qmail 33827 invoked by uid 500); 3 Apr 2002 23:16:02 -0000 Mailing-List: contact test-cvs-help@httpd.apache.org; run by ezmlm Precedence: bulk Reply-To: test-dev@httpd.apache.org list-help: list-unsubscribe: list-post: Delivered-To: mailing list test-cvs@httpd.apache.org Received: (qmail 33816 invoked from network); 3 Apr 2002 23:16:02 -0000 Date: 3 Apr 2002 23:16:01 -0000 Message-ID: <20020403231601.33628.qmail@icarus.apache.org> From: dougm@apache.org To: httpd-test-cvs@apache.org Subject: cvs commit: httpd-test/perl-framework/Apache-Test/lib/Apache TestConfig.pm X-Spam-Rating: daedalus.apache.org 1.6.2 0/1000/N dougm 02/04/03 15:16:01 Modified: perl-framework/Apache-Test/lib/Apache TestConfig.pm Log: fix proxyssl_url discovery when mod_ssl is not enabled Revision Changes Path 1.126 +4 -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.125 retrieving revision 1.126 diff -u -r1.125 -r1.126 --- TestConfig.pm 29 Mar 2002 17:05:37 -0000 1.125 +++ TestConfig.pm 3 Apr 2002 23:16:01 -0000 1.126 @@ -984,8 +984,10 @@ my $vars = $self->{vars}; unless ($vars->{proxyssl_url}) { - $vars->{proxyssl_url} ||= - $self->{vhosts}->{ $vars->{ssl_module_name} }->{hostport}; + my $ssl = $self->{vhosts}->{ $vars->{ssl_module_name} }; + if ($ssl) { + $vars->{proxyssl_url} ||= $ssl->{hostport}; + } if ($vars->{proxyssl_url}) { $vars->{maxclients}++;