summaryrefslogtreecommitdiff
path: root/LedgerSMB/CP.pm
diff options
context:
space:
mode:
Diffstat (limited to 'LedgerSMB/CP.pm')
-rwxr-xr-xLedgerSMB/CP.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/LedgerSMB/CP.pm b/LedgerSMB/CP.pm
index 279aab95..4d9e6d22 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";