Add set_param()

git-svn-id: svn+ssh://projects.linpro.no/svn/varnish/trunk@1834 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 c32fcfe367917c7bcce618f33f3948d9e80523bb..2d8436c8c7b3e47c07786412dc5f5ffd4525b694 100644 (file)
--- a/varnish-tools/regress/lib/Varnish/Test/Varnish.pm
+++ b/varnish-tools/regress/lib/Varnish/Test/Varnish.pm
@@ -202,6 +202,12 @@ sub stop_child($) {
     $self->send_command("stop");
 }
 
+sub set_param($$$) {
+    my ($self, $param, $value) = @_;
+
+    $self->send_command('param.set', $param, $value);
+}
+
 sub shutdown($) {
     my ($self) = @_;