summaryrefslogtreecommitdiffstats
path: root/perl-install/standalone/net_applet
diff options
context:
space:
mode:
authorOlivier Blin <oblin@mandriva.org>2005-07-13 03:48:39 +0000
committerOlivier Blin <oblin@mandriva.org>2005-07-13 03:48:39 +0000
commitbea81cf1e33daca67dc01afcdf1956b445ae47c1 (patch)
tree5a2d9a335d73a1b7468ec10bca49773d3ac97d1b /perl-install/standalone/net_applet
parentcddf386defea9fcb3900b7b46337b4cc96df6668 (diff)
downloaddrakx-backup-do-not-use-bea81cf1e33daca67dc01afcdf1956b445ae47c1.tar
drakx-backup-do-not-use-bea81cf1e33daca67dc01afcdf1956b445ae47c1.tar.gz
drakx-backup-do-not-use-bea81cf1e33daca67dc01afcdf1956b445ae47c1.tar.bz2
drakx-backup-do-not-use-bea81cf1e33daca67dc01afcdf1956b445ae47c1.tar.xz
drakx-backup-do-not-use-bea81cf1e33daca67dc01afcdf1956b445ae47c1.zip
use dbus_object;
Diffstat (limited to 'perl-install/standalone/net_applet')
-rw-r--r--perl-install/standalone/net_applet4
1 files changed, 3 insertions, 1 deletions
diff --git a/perl-install/standalone/net_applet b/perl-install/standalone/net_applet
index 37300d5a5..14ba43e6f 100644
--- a/perl-install/standalone/net_applet
+++ b/perl-install/standalone/net_applet
@@ -30,6 +30,8 @@ my $current_md5 = md5file($prog_name);
my $net = {};
my $watched_interface;
+my $dbus = dbus_object::system_bus();
+
$SIG{HUP} = sub {
print "received SIGHUP, reloading network configuration\n";
checkNetworkForce();
@@ -110,7 +112,7 @@ my $interactive_cb;
my @attacks_queue;
if ($enable_activefw) {
- $activefw = network::activefw->new(sub {
+ $activefw = network::activefw->new($dbus, sub {
my ($_con, $msg) = @_;
handle_attack($msg->get_args_list) if $msg->get_member eq "Attack";
});