diff options
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/standalone/net_applet | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/perl-install/standalone/net_applet b/perl-install/standalone/net_applet index 7985aac74..2b331bdb9 100644 --- a/perl-install/standalone/net_applet +++ b/perl-install/standalone/net_applet @@ -101,7 +101,12 @@ my @attacks_queue; if ($enable_activefw) { $activefw = network::activefw->new($dbus, sub { my ($_con, $msg) = @_; - handle_attack($msg->get_args_list) if $msg->get_member eq "Attack"; + my $member = $msg->get_member; + if ($member eq 'Attack') { + handle_attack($msg->get_args_list); + } elsif ($member eq 'Init') { + $activefw->attach_object; + } }); } |