debian/0000755000000000000000000000000012231171326007164 5ustar debian/watch0000644000000000000000000000015412105471350010215 0ustar version=3 https://metacpan.org/release/Net-DBus/ .*/Net-DBus-v?(\d[\d.-]+)\.(?:tar(?:\.gz|\.bz2)?|tgz|zip)$ debian/rules0000755000000000000000000000003612105471350010243 0ustar #!/usr/bin/make -f %: dh $@ debian/copyright0000644000000000000000000000303712105471350011122 0ustar Format: http://www.debian.org/doc/packaging-manuals/copyright-format/1.0/ Upstream-Name: Net-DBus Upstream-Contact: Daniel P. Berrange Source: https://metacpan.org/release/Net-DBus/ Files: * Copyright: Daniel P. Berrange License: GPL-2+ or Artistic Files: debian/* Copyright: 2006-2011, Jack Bates 2006, Michael Ablassmeier 2012, intrigeri 2013, Xavier Guimard License: Artistic or GPL-1+ License: Artistic This program is free software; you can redistribute it and/or modify it under the terms of the Artistic License, which comes with Perl. . On Debian systems, the complete text of the Artistic License can be found in `/usr/share/common-licenses/Artistic'. License: GPL-1+ This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 1, or (at your option) any later version. . On Debian systems, the complete text of version 1 of the GNU General Public License can be found in `/usr/share/common-licenses/GPL-1'. License: GPL-2+ This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 2, or (at your option) any later version. . On Debian systems, the complete text of version 2 of the GNU General Public License can be found in `/usr/share/common-licenses/GPL-2'. debian/libnet-dbus-perl.examples0000644000000000000000000000001312105471350014066 0ustar examples/* debian/source/0000755000000000000000000000000012105471350010464 5ustar debian/source/format0000644000000000000000000000001412105471350011672 0ustar 3.0 (quilt) debian/patches/0000755000000000000000000000000012105471350010613 5ustar debian/patches/fix-invocation-of-properties.patch0000644000000000000000000000275512105471350017376 0ustar Description: Fix invocation of properties Author: Daniel P. Berrange Bug-Debian: http://bugs.debian.org/cgi-bin/bugreport.cgi?bug=659759 Bug: http://hg.berrange.com/libraries/net-dbus--devel?cs=7e46ba9822e1 Forwarded: yes Reviewed-By: Xavier Guimard Last-Update: 2013-02-04 --- a/lib/Net/DBus/RemoteObject.pm +++ b/lib/Net/DBus/RemoteObject.pm @@ -364,10 +364,10 @@ } if (@_) { - $self->_call_method($mode, "Set", "org.freedesktop.DBus.Properties", $interface, 1, $name, $_[0]); + $self->_call_method($mode, "Set", "org.freedesktop.DBus.Properties", 1, $interface, $name, $_[0]); return (); } else { - return $self->_call_method($mode, "Get", "org.freedesktop.DBus.Properties", $interface, 1, $name); + return $self->_call_method($mode, "Get", "org.freedesktop.DBus.Properties", 1, $interface, $name); } } } else { @@ -392,10 +392,10 @@ warn "property $name in interface $interface on " . $self->get_object_path . " is deprecated"; } if (@_) { - $self->_call_method($mode, "Set", "org.freedesktop.DBus.Properties", $interface, 1, $name, $_[0]); + $self->_call_method($mode, "Set", "org.freedesktop.DBus.Properties", 1, $interface, $name, $_[0]); return (); } else { - return $self->_call_method($mode, "Get", "org.freedesktop.DBus.Properties", $interface, 1, $name); + return $self->_call_method($mode, "Get", "org.freedesktop.DBus.Properties", 1, $interface, $name); } } } debian/patches/spelling-errors.patch0000644000000000000000000001672412105471350014775 0ustar Description: Spelling errors Author: Xavier Guimard Bug: https://rt.cpan.org/Ticket/Display.html?id=83113 Forwarded: https://rt.cpan.org/Ticket/Display.html?id=83113 Last-Update: 2013-02-04 --- a/lib/Net/DBus/Exporter.pm +++ b/lib/Net/DBus/Exporter.pm @@ -532,7 +532,7 @@ =over 4 -=item No paramters, no return values +=item No parameters, no return values A method which simply prints "Hello World" each time its called @@ -578,7 +578,7 @@ =item Annotating methods with metdata -A method which is targetted for removal, and also does not +A method which is targeted for removal, and also does not return any value sub PlayMP3 { --- a/lib/Net/DBus/RemoteService.pm +++ b/lib/Net/DBus/RemoteService.pm @@ -125,7 +125,7 @@ Retrieves a handle to the remote object provided by the service with the name of C<$object_path>. If the optional C<$interface> parameter is provided, the object will immediately be cast to the designated -interface. NB, it is only neccessary to cast an object to a specific +interface. NB, it is only necessary to cast an object to a specific interface if there are multiple interfaces on the object providing methods with the same name, or the remote object does support introspection. The returned object will be an instance of L. --- a/lib/Net/DBus/Service.pm +++ b/lib/Net/DBus/Service.pm @@ -63,7 +63,7 @@ Create a new service, attaching to the bus provided in the C<$bus> parameter, which should be an instance of the L object. The C<$name> parameter is the -qualified service name. It is not usually neccessary to +qualified service name. It is not usually necessary to use this constructor, since services can be created via the C method on the L object. --- a/lib/Net/DBus/Callback.pm +++ b/lib/Net/DBus/Callback.pm @@ -48,7 +48,7 @@ about a callback to be invoked at a later date. It is used when registering to receive events from the L class. NB use of this module in application code is no longer -neccessary and it remains purely for backwards compatability. +necessary and it remains purely for backwards compatibility. Instead you can simply pass a subroutine code reference in any place where a callback is desired. --- a/lib/Net/DBus/Reactor.pm +++ b/lib/Net/DBus/Reactor.pm @@ -125,7 +125,7 @@ Creates a new event loop ready for monitoring file handles, or generating timeouts. Except in very unsual circumstances (examples -of which I can't think up) it is not neccessary or desriable to +of which I can't think up) it is not necessary or desriable to explicitly create new reactor instances. Instead call the L
method to get a handle to the singleton instance. @@ -597,7 +597,7 @@ =item $reactor->toggle_timeout($id, $status[, $interval]); Updates the state of a previously registered timeout -specifed by the C<$id> parameter. The C<$status> +specified by the C<$id> parameter. The C<$status> parameter specifies whether the timeout is to be enabled or disabled, while the optional C<$interval> parameter can be used to change the period of the timeout. --- a/lib/Net/DBus/RemoteObject.pm +++ b/lib/Net/DBus/RemoteObject.pm @@ -71,7 +71,7 @@ data can be used to automatically resolve the correct interface to call cases where method names are unique. Rather than using this constructor directly, it is preferrable to use the C method on L, since this caches handles -to remote objects, eliminating unneccessary introspection data lookups. +to remote objects, eliminating unnecessary introspection data lookups. =cut @@ -97,7 +97,7 @@ Casts the object to a specific interface, returning a new instance of the L specialized to the desired interface. It is only -neccessary to cast objects to a specific interface, if two interfaces +necessary to cast objects to a specific interface, if two interfaces export methods or signals with the same name, or the remote object does not support introspection. --- a/lib/Net/DBus/Test/MockObject.pm +++ b/lib/Net/DBus/Test/MockObject.pm @@ -65,7 +65,7 @@ !!!!! WARNING !!! This object & its APIs should be considered very experimental at -this point in time, and no guarentees about future API compatability +this point in time, and no guarentees about future API compatibility are provided what-so-ever. Comments & suggestions on how to evolve this framework are, however, welcome & encouraged. --- a/lib/Net/DBus/Test/MockMessage.pm +++ b/lib/Net/DBus/Test/MockMessage.pm @@ -201,7 +201,7 @@ =item my $interface = $msg->get_interface -Retrieves the name of the interface targetted by this message, possibly +Retrieves the name of the interface targeted by this message, possibly an empty string if there is no applicable interface for this message. =cut --- a/lib/Net/DBus/Test/MockConnection.pm +++ b/lib/Net/DBus/Test/MockConnection.pm @@ -72,7 +72,7 @@ =item my $con = Net::DBus::Test::MockConnection->new() Create a new mock connection object instance. It is not usually -neccessary to create instances of this object directly, instead +necessary to create instances of this object directly, instead the C method on the L object can be used to get a handle to a test bus. --- a/lib/Net/DBus/Binding/Value.pm +++ b/lib/Net/DBus/Binding/Value.pm @@ -53,7 +53,7 @@ =item my $value = Net::DBus::Binding::Value->new($type, $value); Creates a wrapper for the perl value C<$value> marking it as having -the dbus data type C<$type>. It is not neccessary to call this method +the dbus data type C<$type>. It is not necessary to call this method directly, instead the data typing methods in the L object should be used. --- a/lib/Net/DBus/Binding/Message.pm +++ b/lib/Net/DBus/Binding/Message.pm @@ -210,7 +210,7 @@ =item my $interface = $msg->get_interface -Retrieves the name of the interface targetted by this message, possibly +Retrieves the name of the interface targeted by this message, possibly an empty string if there is no applicable interface for this message. =cut --- a/lib/Net/DBus/Tutorial/ExportingObjects.pod +++ b/lib/Net/DBus/Tutorial/ExportingObjects.pod @@ -177,7 +177,7 @@ use base qw(Net::DBus); use Net::DBus::Exporter qw(com.berrange.music.player.manager) -Next up, it is neccessary to provide data types for the parameters and return +Next up, it is necessary to provide data types for the parameters and return values of the methods. The L module provides a method C for this purpose, which takes three parameter, the name of the method being exported, an array reference of parameter types, and an array @@ -251,7 +251,7 @@ This object implements the C interface which has a method C. This enables clients to determine a list of all objects exported within a service. While not functionally -neccessary for most applications, it is none-the-less a useful tool for +necessary for most applications, it is none-the-less a useful tool for developers debugging applications, or wondering what a service provides. =head1 CONNECTING TO THE BUS @@ -274,7 +274,7 @@ my $bus = Net::DBus->find; my $player = Music::Player->new($bus); -With the service attached to the bus, it is merely neccessary to run +With the service attached to the bus, it is merely necessary to run the main event processing loop to listen out for & handle incoming DBus messages. So the above code is modified to start a simple reactor: debian/patches/series0000644000000000000000000000007112105471350012026 0ustar fix-invocation-of-properties.patch spelling-errors.patch debian/compat0000644000000000000000000000000212105471350010362 0ustar 9 debian/libnet-dbus-perl.lintian-overrides0000644000000000000000000000040612105471350015714 0ustar # The following term can not be wrapped (inside a =over): # C, libnet-dbus-perl: manpage-has-errors-from-man usr/share/man/man3/Net::DBus.3pm.gz 242: warning [p 2, 6.0i]: can't break line debian/control0000644000000000000000000000255312105471350010574 0ustar Source: libnet-dbus-perl Maintainer: Debian Perl Group Uploaders: intrigeri , Xavier Guimard Section: perl Priority: optional Build-Depends: debhelper (>= 9.20120312), libdbus-1-dev, libtest-pod-coverage-perl, libtest-pod-perl, libxml-twig-perl, perl Standards-Version: 3.9.4 Vcs-Browser: http://anonscm.debian.org/gitweb/?p=pkg-perl/packages/libnet-dbus-perl.git Vcs-Git: git://anonscm.debian.org/pkg-perl/packages/libnet-dbus-perl.git Homepage: https://metacpan.org/release/Net-DBus/ Package: libnet-dbus-perl Architecture: any Depends: ${misc:Depends}, ${perl:Depends}, ${shlibs:Depends}, libxml-twig-perl Description: Perl extension for the DBus bindings Net::DBus provides a Perl API for the DBus message system. The DBus Perl interface is currently operating against the 0.32 development version of DBus, but should work with later versions too, providing the API changes have not been too drastic. . Users of this package are either typically, service providers in which case the Net::DBus::Service and Net::DBus::Object modules are of most relevance, or are client consumers, in which case Net::DBus::RemoteService and Net::DBus::RemoteObject are of most relevance. debian/changelog0000644000000000000000000000635112231171326011043 0ustar libnet-dbus-perl (1.0.0-2build1) trusty; urgency=low * Rebuild for Perl 5.18. -- Colin Watson Mon, 21 Oct 2013 10:24:38 +0100 libnet-dbus-perl (1.0.0-2) unstable; urgency=low [ intrigeri ] * Adopt under the Debian Perl Group umbrella. (Closes: #680181) Thanks to Jack Bates for his past work on the package. * Update debian/copyright with cme. * Bump to debhelper compat level 9, to get hardening flags in. * Point the Vcs-* control fields to the pkg-perl repository. * Add myself to debian/copyright. * Install examples using debian/libnet-dbus-perl.example instead of an override. * Install README using libnet-dbus-perl.docs instead of an override. * Bump Standards-Version to 3.9.3, no change required. [ Salvatore Bonaccorso ] * Change Vcs-Git to canonical URI (git://anonscm.debian.org) * Change search.cpan.org based URIs to metacpan.org based URIs [ Xavier Guimard ] * Add patch to fix invocation of properties (Closes: #659759) * Add spelling patch * Remove README from docs * Bump Standards-Version to 3.9.4 * Bump debhelper dependency version to 9.20120312 * Update description * Add lintian overrides file to hide a man problem: one term can not be wrapped to 80 characters -- Xavier Guimard Sat, 09 Feb 2013 16:51:09 +0100 libnet-dbus-perl (1.0.0-1) unstable; urgency=low * New upstream release -- Jack Bates Tue, 19 Jul 2011 10:22:14 -0700 libnet-dbus-perl (0.33.6-2) unstable; urgency=low * Apply upstream changeset, don't test precise equality for doubles, http://hg.berrange.com/libraries/net-dbus--devel?cs=4d79f66fdddc (Closes: #578905) -- Jack Bates Wed, 5 May 2010 21:34:50 -0700 libnet-dbus-perl (0.33.6-1) unstable; urgency=low * New upstream release -- Jack Bates Thu, 03 Apr 2008 14:13:13 -0700 libnet-dbus-perl (0.33.5-1) unstable; urgency=low * New upstream release (Closes: #430186) -- Jack Bates Thu, 19 Jul 2007 20:27:08 -0700 libnet-dbus-perl (0.33.4-1) unstable; urgency=low * New upstream release (Closes: #408881) * Acknowledge NMU. Thanks Michael Ablassmeier (Closes: #386925) * Disable tests until next upstream release, http://rt.cpan.org/Public/Bug/Display.html?id=22850 (Closes: #395861) -- Jack Bates Wed, 7 Mar 2007 01:04:06 -0800 libnet-dbus-perl (0.33.3-1.1) unstable; urgency=low * Non-maintainer upload * Fix FTBFS caused by obsolete DBus functions (Closes: #385378) -- Michael Ablassmeier Mon, 11 Sep 2006 08:02:57 +0200 libnet-dbus-perl (0.33.3-1) unstable; urgency=low * New upstream release -- Jack Bates Thu, 6 Jul 2006 14:00:45 -0700 libnet-dbus-perl (0.33.2-1) unstable; urgency=low * New upstream release -- Jack Bates Tue, 6 Jun 2006 12:28:19 -0700 libnet-dbus-perl (0.33.1-1) unstable; urgency=low * New upstream release -- Jack Bates Sat, 20 May 2006 13:17:42 -0700 libnet-dbus-perl (0.32.2-1) unstable; urgency=low * Initial release (Closes: #292684) -- Jack Bates Sat, 20 May 2006 13:17:42 -0700