From 2d996691358d2152fe6c847b9adb4918f7001763 Mon Sep 17 00:00:00 2001
From: tetragon <tetragon@4979c152-3d1c-0410-bac9-87ea11338e46>
Date: Sun, 23 Mar 2008 19:44:48 +0000
Subject: Get _parse_array to work with DBD::Pg 2.3

git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@2114 4979c152-3d1c-0410-bac9-87ea11338e46
---
 LedgerSMB/DBObject.pm | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/LedgerSMB/DBObject.pm b/LedgerSMB/DBObject.pm
index 6a44fde8..00c94473 100644
--- a/LedgerSMB/DBObject.pm
+++ b/LedgerSMB/DBObject.pm
@@ -248,6 +248,8 @@ sub run_custom_queries {
 
 sub _parse_array {
     my ($self, $value) = @_;
+    return @$value if ref $value eq 'ARRAY';
+
     my $next;
     my $separator;
     my @return_array;
-- 
cgit v1.2.3