SF.net SVN: ledger-smb: [724] trunk/LedgerSMB/CP.pm

[..hidden..]

Revision: 724
          http://svn.sourceforge.net/ledger-smb/?rev=724&view=rev
Author:   einhverfr
Date:     2006-12-05 14:06:23 -0800 (Tue, 05 Dec 2006)

Log Message:
-----------
Fixed invoices not showing up on cash screens.

Modified Paths:
--------------
    trunk/LedgerSMB/CP.pm

Modified: trunk/LedgerSMB/CP.pm
===================================================================
--- trunk/LedgerSMB/CP.pm	2006-12-05 22:05:46 UTC (rev 723)
+++ trunk/LedgerSMB/CP.pm	2006-12-05 22:06:23 UTC (rev 724)
@@ -215,7 +215,7 @@
 	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";


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.