configure shorewall interfaces at startup if needed

1 files changed, 3 insertions, 2 deletions

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');