[libnet-dbus-perl] 68/335: No longer require inteface name

[Intrigeri]

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 212bad7c2bd5c0a59dc8da358d0bb66a5abb7706
Author: Daniel P. Berrange <dan at berrange.com>
Date:   Sun Aug 14 18:08:09 2005 +0000

    No longer require inteface name
---
 examples/dump-object.pl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/examples/dump-object.pl b/examples/dump-object.pl
index 4cda072..74f7d25 100644
--- a/examples/dump-object.pl
+++ b/examples/dump-object.pl
@@ -6,10 +6,10 @@ use Net::DBus::Dumper;
 my $bus = Net::DBus->find;
 
 if ($#ARGV != 2) {
-    die "syntax: $0 SERVICE OBJECT INTERFACE\n";
+    die "syntax: $0 SERVICE-NAME OBJECT-PATH\n";
 }
 
 my $service = $bus->get_service($ARGV[0]);
-my $object = $service->get_object($ARGV[1], $ARGV[2]);
+my $object = $service->get_object($ARGV[1]);
 
 print dbus_dump($object);

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