diff options
| author | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-10-11 23:15:06 +0000 |
|---|---|---|
| committer | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-10-11 23:15:06 +0000 |
| commit | 6811633ba24b64e0ac65e9731a8c9ea66943f8cb (patch) | |
| tree | fd24c79cfb2d86d76978612daa3fc29f932a4858 /LedgerSMB | |
| parent | 2df2b8795e421facd63840e9b62466f921003c8b (diff) | |
Fixing error on parts cost display, bug 1811470
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/branches/1.2@1747 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'LedgerSMB')
| -rwxr-xr-x | LedgerSMB/IC.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/LedgerSMB/IC.pm b/LedgerSMB/IC.pm index 32771b6b..175393c7 100755 --- a/LedgerSMB/IC.pm +++ b/LedgerSMB/IC.pm @@ -56,6 +56,7 @@ sub get_part { my $sth = $dbh->prepare($query); $sth->execute( $form->{id} ) || $form->dberror($query); my $ref = $sth->fetchrow_hashref(NAME_lc); + $form->db_parse_numeric(sth => $sth, hashref => $ref); # copy to $form variables for ( keys %$ref ) { $form->{$_} = $ref->{$_} } |