From: petter <petter@d4fa192b-c00b-0410-8231-f00ffab90ce4>
Date: Fri, 20 Feb 2009 06:53:55 +0000 (+0000)
Subject: Forgot to escape \ when sending VCL to management port
X-Git-Url: https://err.no/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=95e8cc14be89b95cfc596a0136573494f7ebebc1;p=varnish

Forgot to escape \ when sending VCL to management port


git-svn-id: svn+ssh://projects.linpro.no/svn/varnish/trunk@3789 d4fa192b-c00b-0410-8231-f00ffab90ce4
---

diff --git a/varnish-tools/webgui/Varnish/Management.pm b/varnish-tools/webgui/Varnish/Management.pm
index 7574a4d6..9e3b2dc3 100644
--- a/varnish-tools/webgui/Varnish/Management.pm
+++ b/varnish-tools/webgui/Varnish/Management.pm
@@ -155,6 +155,7 @@ use Varnish::Util qw(set_error get_error no_error);
 
 	sub set_vcl {
 		my ($self, $vcl_name, $vcl) = @_;
+		$vcl =~ s/\\/\\\\/g;
 		$vcl =~ s/"/\\"/g;
 		$vcl =~ s/\r//g;
 		$vcl =~ s/\n/\\n/g;