Subject: | Odd number of hash elements passed to XML::RPC->new |
While connecting to Bugzilla I get following warning:
Odd number of elements in hash assignment at
/usr/share/perl5/RPC/XML/Client.pm line 81, <STDIN> line 1.
Attached patch should fix it.
Subject: | 0001-Do-not-pass-login-callback-reference-to-XML-RPC-cons.patch |
From e23387d3bad559295b5e2fbea0266ee184da7bb2 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Petr=20P=C3=ADsa=C5=99?= <ppisar@redhat.com>
Date: Mon, 4 Apr 2011 13:42:14 +0200
Subject: [PATCH] Do not pass login callback reference to XML::RPC constructor
---
lib/Fedora/Bugzilla/XMLRPC.pm | 3 ++-
1 files changed, 2 insertions(+), 1 deletions(-)
diff --git a/lib/Fedora/Bugzilla/XMLRPC.pm b/lib/Fedora/Bugzilla/XMLRPC.pm
index 2181b38..e83a355 100644
--- a/lib/Fedora/Bugzilla/XMLRPC.pm
+++ b/lib/Fedora/Bugzilla/XMLRPC.pm
@@ -32,13 +32,14 @@ has login_cb => (is => 'ro', isa => 'CodeRef', required => 1);
sub new {
my $class = shift;
+ my $login_cb = pop @_;
# call XML::RPC's constructor
my $obj = $class->SUPER::new(@_);
$obj = $class->meta->new_object(
# pass in the constructed object using the special key __INSTANCE__
__INSTANCE__ => $obj,
- login_cb => pop @_,
+ login_cb => $login_cb,
);
$obj->BUILDALL;
return $obj;
--
1.7.4.2