diff options
| author | tetragon <tetragon@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-11-29 20:24:56 +0000 |
|---|---|---|
| committer | tetragon <tetragon@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-11-29 20:24:56 +0000 |
| commit | bc761936059300ae24be93b5ac7dcbf3a0c62a34 (patch) | |
| tree | ee2060f8af976cfd243d898dfe343769dc2a9ab9 /LedgerSMB | |
| parent | adcdb4574294942cee0efeeb7bc805a265b1c9d9 (diff) | |
Fix for bug 1831402
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@1920 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'LedgerSMB')
| -rw-r--r-- | LedgerSMB/IS.pm | 1 | ||||
| -rw-r--r-- | LedgerSMB/OE.pm | 1 |
2 files changed, 2 insertions, 0 deletions
diff --git a/LedgerSMB/IS.pm b/LedgerSMB/IS.pm index 5b82675a..78819ea4 100644 --- a/LedgerSMB/IS.pm +++ b/LedgerSMB/IS.pm @@ -242,6 +242,7 @@ sub invoice_details { if ( $form->{"qty_$i"} ) { + $form->{discount} = [] if ref $form->{discount} ne 'ARRAY'; $form->{totalqty} += $form->{"qty_$i"}; $form->{totalship} += $form->{"qty_$i"}; $form->{totalweight} += diff --git a/LedgerSMB/OE.pm b/LedgerSMB/OE.pm index e274cc03..36e21b36 100644 --- a/LedgerSMB/OE.pm +++ b/LedgerSMB/OE.pm @@ -1204,6 +1204,7 @@ sub order_details { if ( $form->{"qty_$i"} ) { + $form->{discount} = [] if ref $form->{discount} ne 'ARRAY'; $form->{totalqty} += $form->{"qty_$i"}; $form->{totalship} += $form->{"ship_$i"}; $form->{totalweight} += |