r3789 - trunk/varnish-tools/webgui/Varnish

[petter at projects.linpro.no]

Author: petter
Date: 2009-02-20 07:53:55 +0100 (Fri, 20 Feb 2009)
New Revision: 3789

Modified:
   trunk/varnish-tools/webgui/Varnish/Management.pm
Log:
Forgot to escape \ when sending VCL to management port


Modified: trunk/varnish-tools/webgui/Varnish/Management.pm
===================================================================
--- trunk/varnish-tools/webgui/Varnish/Management.pm	2009-02-19 16:00:22 UTC (rev 3788)
+++ trunk/varnish-tools/webgui/Varnish/Management.pm	2009-02-20 06:53:55 UTC (rev 3789)
@@ -155,6 +155,7 @@
 
 	sub set_vcl {
 		my ($self, $vcl_name, $vcl) = @_;
+		$vcl =~ s/\\/\\\\/g;
 		$vcl =~ s/"/\\"/g;
 		$vcl =~ s/\r//g;
 		$vcl =~ s/\n/\\n/g;