[libnet-dbus-perl] 28/335: Added add_match rule. Dummy DESTROY method

[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 4ddf707515ed18744750fbcf93d407cd378f7dc7
Author: Daniel P. Berrange <dan at berrange.com>
Date:   Tue Nov 23 23:26:18 2004 +0000

    Added add_match rule. Dummy DESTROY method
---
 lib/Net/DBus/Binding/Bus.pm | 11 +++++++++++
 1 file changed, 11 insertions(+)

diff --git a/lib/Net/DBus/Binding/Bus.pm b/lib/Net/DBus/Binding/Bus.pm
index 83b06c8..6afa44b 100644
--- a/lib/Net/DBus/Binding/Bus.pm
+++ b/lib/Net/DBus/Binding/Bus.pm
@@ -33,6 +33,17 @@ sub acquire_service {
     $self->{connection}->dbus_bus_aquire_service($service_name);
 }
 
+sub add_match {
+    my $self = shift;
+    my $rule = shift;
+    
+    $self->{connection}->dbus_bus_add_match($rule);
+}
+
+sub DESTROY {
+    # Keep autoloader quiet
+}
+
 sub AUTOLOAD {
     # This AUTOLOAD is used to 'autoload' constants from the constant()
     # XS function.

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