stas 2004/03/05 18:07:58
Modified: perl-framework/Apache-Test/lib/Apache TestServer.pm
Log:
if the server doesn't start, add a suggestion to try again with a higher
timeout value
Revision Changes Path
1.81 +8 -1
httpd-test/perl-framework/Apache-Test/lib/Apache/TestServer.pm
Index: TestServer.pm
===================================================================
RCS file:
/home/cvs/httpd-test/perl-framework/Apache-Test/lib/Apache/TestServer.pm,v
retrieving revision 1.80
retrieving revision 1.81
diff -u -u -r1.80 -r1.81
--- TestServer.pm 5 Mar 2004 13:22:11 -0000 1.80
+++ TestServer.pm 6 Mar 2004 02:07:58 -0000 1.81
@@ -560,7 +560,14 @@
last;
}
elsif ($delta > $timeout) {
- print $preamble, "giving up after $delta secs\n";
+ my $suggestion = $timeout + 300;
+ print $preamble, "not ok\n";
+ error <<EOI;
+giving up after $delta secs. If you think that your system
+is slow or overloaded try again with a longer timeout value.
+by setting the environment variable APACHE_TEST_STARTUP_TIMEOUT
+to a high value (e.g. $suggestion) and repeat the last command.
+EOI
last;
}
}