From dc099447caf044996bf6aa9421c8a0ee2ce1dfe4 Mon Sep 17 00:00:00 2001
From: levinse <levinse>
Date: Sun, 28 Nov 2010 22:30:53 +0000
Subject: [PATCH] Force particular response elements to always be represented
 as arrays when converted from XML, even if only one such element is present

---
 lib/Net/Ikano.pm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lib/Net/Ikano.pm b/lib/Net/Ikano.pm
index c1e4b87..8b8ec76 100644
--- a/lib/Net/Ikano.pm
+++ b/lib/Net/Ikano.pm
@@ -322,7 +322,8 @@ sub AUTOLOAD {
 	unless $resp->is_success;
     my $respxml = $resp->decoded_content;
 
-    $xs = new Net::Ikano::XMLUtil(RootName => undef, SuppressEmpty => '');
+    $xs = new Net::Ikano::XMLUtil(RootName => undef, SuppressEmpty => '',
+	ForceArray => [ 'Address', 'Product', 'StaticIp', 'OrderNotes' ] );
     my $resphash = $xs->XMLin($respxml);
 
     warn "DEBUG RESPONSE\n\tHASH:\n ".Dumper($resphash)."\n\tXML:\n $respxml"
-- 
2.11.0