From 4b694cf3a2e6d6ca30d0d159e927f812e2f589d5 Mon Sep 17 00:00:00 2001 From: Olivier Blin Date: Thu, 27 Mar 2008 12:49:26 +0000 Subject: do not write conf if disabled --- bin/drakguard | 12 +++++++----- 1 file changed, 7 insertions(+), 5 deletions(-) (limited to 'bin') diff --git a/bin/drakguard b/bin/drakguard index 5b886a5..3f47167 100755 --- a/bin/drakguard +++ b/bin/drakguard @@ -225,12 +225,14 @@ sub save() { my $guardian_port = 8080; my $guardian_user = 'dansguardian'; - $enable && $in->do_pkgs->ensure_are_installed([ qw(shorewall squid dansguardian) ]) - or quit_gui(); + if ($enable) { + $in->do_pkgs->ensure_are_installed([ qw(shorewall squid dansguardian) ]) + or quit_gui(); - $_->{apply}(map { $_->[0] } @{$_->{list}{data}}) foreach @url_lists; - write_dansguardian(); - enable_transparent_proxy($proxy_port); + $_->{apply}(map { $_->[0] } @{$_->{list}{data}}) foreach @url_lists; + write_dansguardian(); + enable_transparent_proxy($proxy_port); + } services::set_status($_, $enable) foreach qw(squid dansguardian); if ($shorewall) { -- cgit v1.2.1