From cdbfd6962d76352ddc39c8b530611d68cc452e7b Mon Sep 17 00:00:00 2001
From: Dobrica Pavlinusic <dpavlin@rot13.org>
Date: Fri, 11 Dec 2009 13:16:39 +0100
Subject: [PATCH] create var dir if needed

---
 proxy.pl | 1 +
 1 file changed, 1 insertion(+)

diff --git a/proxy.pl b/proxy.pl
index 3994010..f6fc12b 100755
--- a/proxy.pl
+++ b/proxy.pl
@@ -14,6 +14,7 @@ use Data::Dump qw(dump);
 sub var_save {
 	my ( $dir, $name, $value ) = @_;
 	$value ||= "\n";
+	mkdir 'var' unless -e 'var';
 	mkdir "var/$dir" unless -e "var/$dir";
 	open(my $fh, '>>', "var/$dir/$name") || die $!;
 	print $fh $value;
-- 
2.20.1