[libnet-dbus-perl] 295/335: Remove accidental debug lines
Intrigeri
intrigeri at moszumanska.debian.org
Sat Mar 21 01:08:12 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 034fdf03fa09acbf674505b85a9841c24d0765ae
Author: Daniel P. Berrange <dan at berrange.com>
Date: Thu Jun 30 21:54:39 2011 +0100
Remove accidental debug lines
---
lib/Net/DBus.pm | 3 +--
1 file changed, 1 insertion(+), 2 deletions(-)
diff --git a/lib/Net/DBus.pm b/lib/Net/DBus.pm
index 16a8029..17b6ceb 100644
--- a/lib/Net/DBus.pm
+++ b/lib/Net/DBus.pm
@@ -452,7 +452,6 @@ sub _match_rule {
if (defined $signal_name) {
$rule .= ",member='$signal_name'";
}
- print "$rule\n";
return $rule;
}
@@ -498,7 +497,7 @@ sub _signal_func {
my $sender = $message->get_sender;
my $path = $message->get_path;
my $signal_name = $message->get_member;
- print "Sender $sender\n";
+
my $handled = 0;
foreach my $handler (@{$self->{signals}}) {
next unless $self->_handler_matches($handler, $signal_name, $interface, $sender, $path);
--
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