summaryrefslogtreecommitdiff
path: root/LedgerSMB/DBObject.pm
diff options
context:
space:
mode:
Diffstat (limited to 'LedgerSMB/DBObject.pm')
-rw-r--r--LedgerSMB/DBObject.pm1
1 files changed, 1 insertions, 0 deletions
diff --git a/LedgerSMB/DBObject.pm b/LedgerSMB/DBObject.pm
index 7a2415c8..40d621c5 100644
--- a/LedgerSMB/DBObject.pm
+++ b/LedgerSMB/DBObject.pm
@@ -258,6 +258,7 @@ sub _parse_array {
} elsif ($value =~ /^{({+)/){
my $open_braces = $1;
+ $next = [];
my $close_braces = $open_braces;
$close_braces =~ s/{/}/g;
$value =~ /^{($open_braces[^}]*$close_braces)/;