From 44012896ae888af630184470b669eb3e11e47977 Mon Sep 17 00:00:00 2001 From: des Date: Fri, 15 Jun 2007 09:03:34 +0000 Subject: [PATCH] Catch up with framework changes. git-svn-id: svn+ssh://projects.linpro.no/svn/varnish/trunk@1520 d4fa192b-c00b-0410-8231-f00ffab90ce4 --- varnish-tools/regress/lib/Varnish/Test/Case/Vary.pm | 13 +++++++------ 1 file changed, 7 insertions(+), 6 deletions(-) diff --git a/varnish-tools/regress/lib/Varnish/Test/Case/Vary.pm b/varnish-tools/regress/lib/Varnish/Test/Case/Vary.pm index 25e0508d..1212f845 100644 --- a/varnish-tools/regress/lib/Varnish/Test/Case/Vary.pm +++ b/varnish-tools/regress/lib/Varnish/Test/Case/Vary.pm @@ -48,13 +48,14 @@ sub testVary($) { $request->header('Accept-Language', $lang); $request->protocol('HTTP/1.1'); $client->send_request($request, 2); - my $response = $self->run_loop; - die 'No (complete) response received' + my ($event, $response) = + $self->run_loop('ev_client_response', 'ev_client_timeout'); + die "No (complete) response received\n" unless defined($response); - die 'Empty body' - if $response->content eq ''; - die 'Incorrect body' - if $response->content ne $languages{$lang}; + die "Empty body\n" + if $response->content() eq ''; + die "Incorrect body\n" + if $response->content() ne $languages{$lang}; } } -- 2.39.5