Mailing-List: contact test-cvs-help@httpd.apache.org; run by ezmlm
Precedence: bulk
Reply-To: test-dev@httpd.apache.org
Date: 27 Jan 2003 09:09:54 -0000
Message-ID: <20030127090954.13528.qmail@icarus.apache.org>
From: stas@apache.org
To: httpd-test-cvs@apache.org
Subject: cvs commit: httpd-test/perl-framework/Apache-Test/lib/Apache
 TestConfig.pm

stas        2003/01/27 01:09:54

  Modified:    perl-framework/Apache-Test/lib/Apache TestConfig.pm
  Log:
  die if we can't figure out what the servername to use (usually happens
  when someone doesn't have the 127.0.0.1 localhost entry in /etc/hosts)
  
  Revision  Changes    Path
  1.145     +2 -0      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.144
  retrieving revision 1.145
  diff -u -r1.144 -r1.145
  --- TestConfig.pm	2 Dec 2002 16:11:48 -0000	1.144
  +++ TestConfig.pm	27 Jan 2003 09:09:54 -0000	1.145
  @@ -500,6 +500,8 @@
   sub default_servername {
       my $self = shift;
       $localhost ||= $self->default_localhost;
  +    die "Can't figure out the default localhost's server name"
  +        unless $localhost;
   }
   
   # memoize the selected value (so we make sure that the same port is used