Wait longer for Varnish to start.

git-svn-id: svn+ssh://projects.linpro.no/svn/varnish/trunk@1890 d4fa192b-c00b-0410-8231-f00ffab90ce4

diff --git a/varnish-tools/regress/lib/Varnish/Test/Varnish.pm b/varnish-tools/regress/lib/Varnish/Test/Varnish.pm
index e1eca1ad26afa71334d9cebb5792dce50e5bb7f8..19f7bc25687bf44391eee07188c5f09f34d01601 100644 (file)
--- a/varnish-tools/regress/lib/Varnish/Test/Varnish.pm
+++ b/varnish-tools/regress/lib/Varnish/Test/Varnish.pm
@@ -136,13 +136,13 @@ sub new($$;$) {
     $self->{'mux'}->add($self->{'stderr'});
     $self->{'mux'}->set_callback_object($self, $self->{'stderr'});
 
-    # Wait up to 0.5 seconds for Varnish to accept our connection
+    # Wait up to 5 seconds for Varnish to accept our connection
     # on the management port
-    for (my $i = 0; $i < 5; ++$i) {
+    for (my $i = 0; $i < 10; ++$i) {
        last if $self->{'socket'} = IO::Socket::INET->
            new(Type => SOCK_STREAM,
                PeerAddr => $engine->{'config'}->{'telnet_address'});
-       select(undef, undef, undef, 0.1);
+       select(undef, undef, undef, 0.5);
     }
     if (!defined($self->{'socket'})) {
        kill(15, delete $self->{'pid'});