From b4d9169174d74815bba046d3c0f7608646e20ee1 Mon Sep 17 00:00:00 2001 From: Olivier Blin Date: Mon, 11 Jul 2005 07:01:10 +0000 Subject: don't use undefined variable --- perl-install/network/activefw.pm | 6 +----- 1 file changed, 1 insertion(+), 5 deletions(-) (limited to 'perl-install') diff --git a/perl-install/network/activefw.pm b/perl-install/network/activefw.pm index 466661eef..f524f7fb1 100644 --- a/perl-install/network/activefw.pm +++ b/perl-install/network/activefw.pm @@ -16,11 +16,7 @@ sub new { set_DBus_watch($con); $con->dispatch; - my $o = bless { - bus => $bus, - daemon => $daemon - }, $type; - + my $o = bless { bus => $bus }, $type; $o->find_daemon; $o; -- cgit v1.2.1