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 469d433443baa83acf9e0d32a43b6023e1108c7a
Author: Daniel P. Berrange <d...@berrange.com>
Date: Mon Sep 26 19:24:48 2005 +0000
Fix method name for introspection to be "Set" rather than "Get" when
writing properties
---
lib/Net/DBus/Object.pm | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/lib/Net/DBus/Object.pm b/lib/Net/DBus/Object.pm
index 3ff9340..aadde1c 100644
--- a/lib/Net/DBus/Object.pm
+++ b/lib/Net/DBus/Object.pm
@@ -398,7 +398,7 @@ sub _dispatch_prop_write {
description => "no
introspection data exported for properties");
}
- my ($pinterface, $pname, $pvalue) = $ins->decode($message, "methods",
"Get", "params");
+ my ($pinterface, $pname, $pvalue) = $ins->decode($message, "methods",
"Set", "params");
if (!$ins->has_property($pname, $pinterface)) {
return Net::DBus::Binding::Message::Error->new(replyto => $message,
--
Alioth's /usr/local/bin/git-commit-notice on
/srv/git.debian.org/git/pkg-perl/packages/libnet-dbus-perl.git
_______________________________________________
Pkg-perl-cvs-commits mailing list
Pkg-perl-cvs-commits@lists.alioth.debian.org
http://lists.alioth.debian.org/cgi-bin/mailman/listinfo/pkg-perl-cvs-commits
