[libnet-dbus-perl] 235/335: Fixed test case to use a private connection
Intrigeri
intrigeri at moszumanska.debian.org
Sat Mar 21 01:08:04 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 6e9145dc9c7be9a482f7b6664ed0e3310e965149
Author: Daniel P. Berrange <berrange at redhat.com>
Date: Tue Nov 14 22:45:50 2006 -0500
Fixed test case to use a private connection
---
t/30-server.t | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/t/30-server.t b/t/30-server.t
index 07a5519..d6e1596 100644
--- a/t/30-server.t
+++ b/t/30-server.t
@@ -24,7 +24,8 @@ $server->set_connection_callback(sub {
$incoming = shift;
});
-my $client = Net::DBus::Binding::Connection->new(address => "unix:path=/tmp/dbus-perl-test-$$");
+my $client = Net::DBus::Binding::Connection->new(address => "unix:path=/tmp/dbus-perl-test-$$",
+ private => 1);
ok ($client->is_connected, "client connected");
$reactor->manage($client);
--
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