summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorOlivier Blin <oblin@mandriva.org>2005-02-18 19:07:24 +0000
committerOlivier Blin <oblin@mandriva.org>2005-02-18 19:07:24 +0000
commit3901fb88e6619250e693e20439fc1331f4ff8dcf (patch)
treeb595e8e3a89caa497bf7a8485f3dae7a36cfa14a /perl-install
parenta2a899d33d08be6a2013988adf130876efda32e2 (diff)
downloaddrakx-backup-do-not-use-3901fb88e6619250e693e20439fc1331f4ff8dcf.tar
drakx-backup-do-not-use-3901fb88e6619250e693e20439fc1331f4ff8dcf.tar.gz
drakx-backup-do-not-use-3901fb88e6619250e693e20439fc1331f4ff8dcf.tar.bz2
drakx-backup-do-not-use-3901fb88e6619250e693e20439fc1331f4ff8dcf.tar.xz
drakx-backup-do-not-use-3901fb88e6619250e693e20439fc1331f4ff8dcf.zip
support GetReports method
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/network/activefw.pm5
1 files changed, 5 insertions, 0 deletions
diff --git a/perl-install/network/activefw.pm b/perl-install/network/activefw.pm
index 78e958043..5ddd696d2 100644
--- a/perl-install/network/activefw.pm
+++ b/perl-install/network/activefw.pm
@@ -105,6 +105,11 @@ sub set_interactive {
Net::DBus::Binding::Value->new(&Net::DBus::Binding::Message::TYPE_UINT32, $mode));
}
+sub get_reports {
+ my ($o) = @_;
+ $o->call_method('GetReports');
+}
+
sub get_blacklist {
my ($o) = @_;
$o->call_method('GetBlacklist');