[libnet-dbus-perl] 216/335: Clarified comment

Intrigeri intrigeri at moszumanska.debian.org
Sat Mar 21 01:08:00 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 e65537632b94a0de223b4e5614d20cf25c4bb550
Author: Daniel P. Berrange <berrange at redhat.com>
Date:   Sun Jul 16 18:30:58 2006 -0400

    Clarified comment
---
 lib/Net/DBus/Binding/Introspector.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lib/Net/DBus/Binding/Introspector.pm b/lib/Net/DBus/Binding/Introspector.pm
index 527d4c0..4d700c6 100644
--- a/lib/Net/DBus/Binding/Introspector.pm
+++ b/lib/Net/DBus/Binding/Introspector.pm
@@ -140,8 +140,8 @@ sub new {
 	$self->{children} = exists $params{children} ? $params{children} : [];
     }
 
-    # XXX it is really a bug that these aren't included in the introspection
-    # data the bus generates
+    # Some versions of dbus failed to include signals in introspection data
+    # so this code adds them, letting us keep compatability with old versions
     if ($self->{object_path} eq "/org/freedesktop/DBus") {
 	if (!$self->has_signal("NameOwnerChanged")) {
 	    $self->add_signal("NameOwnerChanged", ["string","string","string"], "org.freedesktop.DBus");

-- 
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