r2160 - trunk/varnish-tools/regress/lib/Varnish/Test/Server

des at projects.linpro.no des at projects.linpro.no
Tue Oct 23 13:57:17 CEST 2007


Author: des
Date: 2007-10-23 13:57:16 +0200 (Tue, 23 Oct 2007)
New Revision: 2160

Modified:
   trunk/varnish-tools/regress/lib/Varnish/Test/Server/Connection.pm
Log:
Add a test case for the root cause of #164, which is that the backend sends
a garbled response (or no response at all).


Modified: trunk/varnish-tools/regress/lib/Varnish/Test/Server/Connection.pm
===================================================================
--- trunk/varnish-tools/regress/lib/Varnish/Test/Server/Connection.pm	2007-10-23 11:56:56 UTC (rev 2159)
+++ trunk/varnish-tools/regress/lib/Varnish/Test/Server/Connection.pm	2007-10-23 11:57:16 UTC (rev 2160)
@@ -67,6 +67,20 @@
     return $self;
 }
 
+=head2 write
+
+Write data to the connection
+
+=cut
+
+sub write($@) {
+    my ($self, @data) = @_;
+
+    foreach my $data (@data) {
+	$self->{'mux'}->write($self->{'fh'}, $data);
+    }
+}
+
 =head2 send_response
 
 Called by test-cases to send a given HTTP::Response object out on the




More information about the varnish-commit mailing list