diff options
| author | Olivier Blin <oblin@mandriva.com> | 2008-04-01 14:19:21 +0000 |
|---|---|---|
| committer | Olivier Blin <oblin@mandriva.com> | 2008-04-01 14:19:21 +0000 |
| commit | d9f854e1b6511c109164798bf3d088802a06206d (patch) | |
| tree | c617c19cdc094ca78527763c4ef78ede3b40bbd0 /perl-install | |
| parent | c9c3b7168517e9546bcdd57c77172b5d2694da98 (diff) | |
| download | drakx-d9f854e1b6511c109164798bf3d088802a06206d.tar drakx-d9f854e1b6511c109164798bf3d088802a06206d.tar.gz drakx-d9f854e1b6511c109164798bf3d088802a06206d.tar.bz2 drakx-d9f854e1b6511c109164798bf3d088802a06206d.tar.xz drakx-d9f854e1b6511c109164798bf3d088802a06206d.zip | |
allow to pass parameters to dbus_object::system_bus (so that Net::DBus::Reactor main loop can be disabled)
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/dbus_object.pm | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/perl-install/dbus_object.pm b/perl-install/dbus_object.pm index 1b4a4264e..dc9df0d54 100644 --- a/perl-install/dbus_object.pm +++ b/perl-install/dbus_object.pm @@ -1,8 +1,10 @@ package dbus_object; -sub system_bus() { +sub system_bus { + my %params = @_; + #- use nomainloop => 1 to disable Net::DBus::Reactor main loop require Net::DBus; - Net::DBus->system; + Net::DBus->system(%params); } sub new { |