[libnet-dbus-perl] 09/335: Switch back to session bus

[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 23c8e75e16d49c3b65306de9ad7894aaf385a7fd
Author: Daniel P. Berrange <dan at berrange.com>
Date:   Tue Oct 5 20:17:06 2004 +0000

    Switch back to session bus
---
 examples/service.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/examples/service.pl b/examples/service.pl
index 948fe41..3218419 100644
--- a/examples/service.pl
+++ b/examples/service.pl
@@ -8,7 +8,7 @@ use Net::DBus::Reactor;
 #$SIG{__WARN__} = sub { cluck $_[0] };
 #$SIG{__DIE__} = sub { confess $_[0] };
 
-my $bus = Net::DBus->new($Net::DBus::TYPE_SYSTEM);
+my $bus = Net::DBus->new($Net::DBus::TYPE_SESSION);
 
 my $service = Net::DBus::Service->new("org.example.MyService", 
 				      $bus);

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