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/01/27 10:09:54 UTC
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