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