From 11ef6183fed80eff57eadaddf37bf695376e5de5 Mon Sep 17 00:00:00 2001 From: Olivier Blin Date: Thu, 27 Mar 2008 12:32:51 +0000 Subject: configure shorewall interfaces at startup if needed --- bin/drakguard | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) (limited to 'bin') diff --git a/bin/drakguard b/bin/drakguard index 0d437d8..53ec7c9 100755 --- a/bin/drakguard +++ b/bin/drakguard @@ -15,6 +15,8 @@ use network::shorewall; use network::squid; use services; +my $in = interactive->vnew('su'); + my $dansguardian_main_file = "/etc/dansguardian/dansguardian.conf"; my $dansguardian_filter_file = "/etc/dansguardian/dansguardianf1.conf"; my %dansguardian_levels = ( @@ -55,7 +57,7 @@ my %dansguardian_langs = ( 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 $shorewall = network::shorewall::read($in); load(); @@ -67,7 +69,6 @@ $ugtk2::wm_icon = $icon; my $w = ugtk2->new($title); #- so that transient_for is defined, for wait messages and popups to be centered $::main_window = $w->{real_window}; -my $in = interactive->vnew('su'); my $allusers_list = Gtk2::SimpleList->new(N("All users") => 'text'); $allusers_list->get_selection->set_mode('multiple'); -- cgit v1.2.1