From 29f9f470a738eb3bc4a9894881e47c9c7cc826f4 Mon Sep 17 00:00:00 2001 From: tetragon Date: Wed, 17 Oct 2007 16:09:40 +0000 Subject: Apply db_parse_numeric to the correct hashref, fixes 1815081 git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/branches/1.2@1770 4979c152-3d1c-0410-bac9-87ea11338e46 --- LedgerSMB/RP.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/LedgerSMB/RP.pm b/LedgerSMB/RP.pm index 861ec859..320e6a32 100755 --- a/LedgerSMB/RP.pm +++ b/LedgerSMB/RP.pm @@ -2376,8 +2376,8 @@ sub payments { $sth = $dbh->prepare($query); $sth->execute || $form->dberror($query); - while ( my $pr = $sth->fetchrow_hashref(NAME_lc) ) { - $form->db_parse_numeric(sth=>$sth, hashref=>$ref); + while ( my $pr = $sth->fetchrow_hashref('NAME_lc') ) { + $form->db_parse_numeric(sth=>$sth, hashref=>$pr); push @{ $form->{ $ref->{id} } }, $pr; } $sth->finish; -- cgit v1.2.3