[libnet-dbus-perl] 36/335: Allow additional "lazy_binding" parameter when adding signals to work with case where the service being matched against is not currently attached to the bus - causing the service-name -> sender conversion to fail

Intrigeri intrigeri at moszumanska.debian.org
Sat Mar 21 01:07:17 UTC 2015


This is an automated email from the git hooks/post-receive script.

intrigeri pushed a commit to branch experimental
in repository libnet-dbus-perl.

commit ee2d55d950fac460db2bd311d7868870e12bf7f6
Author: Daniel P. Berrange <dan at berrange.com>
Date:   Mon Dec 27 16:26:54 2004 +0000

    Allow additional "lazy_binding" parameter when adding signals to work with case where the service being matched against is not currently attached to the bus - causing the service-name -> sender conversion to fail
---
 lib/Net/DBus/RemoteObject.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lib/Net/DBus/RemoteObject.pm b/lib/Net/DBus/RemoteObject.pm
index 27782f8..6715f49 100644
--- a/lib/Net/DBus/RemoteObject.pm
+++ b/lib/Net/DBus/RemoteObject.pm
@@ -27,13 +27,14 @@ sub connect_to_signal {
     my $self = shift;
     my $signal_name = shift;
     my $code = shift;
+    my $lazy_binding = shift;
     
     $self->{service}->
 	get_bus()->
 	add_signal_receiver($code,
 			    $signal_name,
 			    $self->{interface},
-			    $self->{service}->get_service_name(),
+			    $lazy_binding ? undef : $self->{service}->get_service_name(),
 			    $self->{object_path});
 }
 

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libnet-dbus-perl.git



More information about the Pkg-perl-cvs-commits mailing list