diff options
author | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-10-11 23:15:57 +0000 |
---|---|---|
committer | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-10-11 23:15:57 +0000 |
commit | 0482656c8c5401a840249a817148b49bde4f58a8 (patch) | |
tree | 4408ef3fd8f23f2fdf343e2f5bbc2faa69d1b285 /LedgerSMB | |
parent | 1d0b99e79370a025608ef7c45c82feb8997f8918 (diff) |
Fixing error on parts cost display, bug 1811470
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@1748 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'LedgerSMB')
-rw-r--r-- | LedgerSMB/IC.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/LedgerSMB/IC.pm b/LedgerSMB/IC.pm index c8d39f5f..2f06891b 100644 --- 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->{$_} } |