r1834 - trunk/varnish-tools/regress/lib/Varnish/Test

[des at projects.linpro.no]

Author: des
Date: 2007-08-13 18:33:46 +0200 (Mon, 13 Aug 2007)
New Revision: 1834

Modified:
   trunk/varnish-tools/regress/lib/Varnish/Test/Varnish.pm
Log:
Add set_param()


Modified: trunk/varnish-tools/regress/lib/Varnish/Test/Varnish.pm
===================================================================
--- trunk/varnish-tools/regress/lib/Varnish/Test/Varnish.pm	2007-08-13 13:53:10 UTC (rev 1833)
+++ trunk/varnish-tools/regress/lib/Varnish/Test/Varnish.pm	2007-08-13 16:33:46 UTC (rev 1834)
@@ -202,6 +202,12 @@
     $self->send_command("stop");
 }
 
+sub set_param($$$) {
+    my ($self, $param, $value) = @_;
+
+    $self->send_command('param.set', $param, $value);
+}
+
 sub shutdown($) {
     my ($self) = @_;