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; } }