diff options
| author | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2006-12-05 22:05:46 +0000 |
|---|---|---|
| committer | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2006-12-05 22:05:46 +0000 |
| commit | 2479af974477a3b41c34788f8cbf6c054eb066c7 (patch) | |
| tree | 99a16ccc56f392b32f9164b49985bfc309637935 /LedgerSMB/CP.pm | |
| parent | 625feea67e95a5a4610526284c7eba0c78211b4c (diff) | |
Fixed invoices not showing up on cash screens.
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/branches/1.2@723 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'LedgerSMB/CP.pm')
| -rwxr-xr-x | LedgerSMB/CP.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/LedgerSMB/CP.pm b/LedgerSMB/CP.pm index edb474ed..150e226d 100755 --- a/LedgerSMB/CP.pm +++ b/LedgerSMB/CP.pm @@ -215,7 +215,7 @@ sub get_openinvoices { my $where = qq|WHERE a.$form->{vc}_id = $vc_id AND a.amount != a.paid|; - $curr = $dbh->quote($form->{curr}); + $curr = $dbh->quote($form->{currency}); $where .= qq| AND a.curr = $curr| if $form->{currency}; my $sortorder = "transdate, invnumber"; |