From 5eae2321154ea61c05fa780599dac2b177692709 Mon Sep 17 00:00:00 2001 From: Olivier Blin Date: Thu, 3 Apr 2008 08:23:48 +0000 Subject: extract variables (for next commit) --- bin/drakguard | 9 ++++----- 1 file changed, 4 insertions(+), 5 deletions(-) (limited to 'bin') diff --git a/bin/drakguard b/bin/drakguard index 132347b..517f72b 100755 --- a/bin/drakguard +++ b/bin/drakguard @@ -56,6 +56,10 @@ my $blacklist_url_file = "/etc/dansguardian/lists/blacklists/drakguard/urls"; my $whitelist_url_file = "/etc/dansguardian/lists/whitelists/drakguard/urls"; my ($enable, $level, $time_control, $allow_time_change); my $shorewall = network::shorewall::read(); +my $proxy_port = 3128; +my $proxy_user = 'squid'; +my $guardian_port = 8080; +my $guardian_user = 'dansguardian'; load(); @@ -236,11 +240,6 @@ sub load() { } sub save() { - my $proxy_port = 3128; - my $proxy_user = 'squid'; - my $guardian_port = 8080; - my $guardian_user = 'dansguardian'; - if ($enable) { $in->do_pkgs->ensure_are_installed([ qw(shorewall squid dansguardian) ]) or quit_gui(1); -- cgit v1.2.1