[libnet-dbus-perl] 62/335: Reverse order of params in constructor

Intrigeri intrigeri at moszumanska.debian.org
Sat Mar 21 01:07:24 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 eaf62f32d75ea0cae2d3e1aeb61f1ec0c2f58b7d
Author: Daniel P. Berrange <dan at berrange.com>
Date:   Sun Aug 14 18:03:59 2005 +0000

    Reverse order of params in constructor
---
 lib/Net/DBus/Service.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/Net/DBus/Service.pm b/lib/Net/DBus/Service.pm
index 05e9f30..3e07209 100644
--- a/lib/Net/DBus/Service.pm
+++ b/lib/Net/DBus/Service.pm
@@ -41,8 +41,8 @@ sub new {
     my $class = shift;
     my $self = {};
 
-    $self->{service_name} = shift;
     $self->{bus} = shift;
+    $self->{service_name} = shift;
     
     bless $self, $class;
 

-- 
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