summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--perl-install/standalone/net_applet10
1 files changed, 7 insertions, 3 deletions
diff --git a/perl-install/standalone/net_applet b/perl-install/standalone/net_applet
index 6e404188b..6a03b85a5 100644
--- a/perl-install/standalone/net_applet
+++ b/perl-install/standalone/net_applet
@@ -56,6 +56,7 @@ my %actions = (
'upNetwork' => { name => sub { N("Connect %s", $_[0]) }, launch => sub { network::tools::start_interface($_[0], 1) } },
'downNetwork' => { name => sub { N("Disconnect %s", $_[0]) }, launch => sub { network::tools::stop_interface($_[0], 1) } },
'monitorNetwork' => { name => N("Monitor Network"), launch => \&run_net_monitor },
+ 'monitorAFW' => { name => N("Active Firewall"), launch => \&run_drakids },
'wireless' => { name => N("Manage wireless networks"), launch => \&run_drakroam },
'confNetwork' => { name => N("Configure Network"), launch => sub { system("/usr/sbin/drakconnect --skip-wizard &") } },
'chooseInterface' => {
@@ -138,12 +139,15 @@ sub shouldStart() {
}
return getAutoStart();
}
-sub run_net_monitor() {
+sub run_net_monitor() {
run_program::raw({ detach => 1 }, '/usr/sbin/net_monitor', '--defaultintf', $current_interface) unless is_running('net_monitor');
}
-sub run_drakroam() {
+sub run_drakroam() {
run_program::raw({ detach => 1 }, '/usr/sbin/drakroam') unless is_running('drakroam');
}
+sub run_drakids() {
+ run_program::raw({ detach => 1 }, '/usr/sbin/drakids') unless is_running('drakids');
+}
sub generate_wireless_menuitem {
my ($net) = @_;
$net->{menuitem} = Gtk2::CheckMenuItem->new;
@@ -257,7 +261,7 @@ sub generate_menu {
my $has_wireless = detect_devices::has_wireless();
if ($state_type eq 'connected') {
- push @actions, $create_item->($_) foreach qw(downNetwork monitorNetwork);
+ push @actions, $create_item->($_) foreach qw(downNetwork monitorNetwork monitorAFW);
} elsif ($state_type eq 'disconnected') {
push @actions, $menu->append($create_item->('upNetwork'));
}