X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=httemplate%2Fedit%2Fcust_bill_pay.cgi;h=61c8a1785c20fea2363405b175f6898e307dacd9;hp=46ca51e82b649124117bc362d11f7724ac51cf4a;hb=2d53ea6d86d638d65f0d14ef5921daf46981269e;hpb=355fe2160a24311e5d1faab56376c9a0781c6479 diff --git a/httemplate/edit/cust_bill_pay.cgi b/httemplate/edit/cust_bill_pay.cgi index 46ca51e82..61c8a1785 100755 --- a/httemplate/edit/cust_bill_pay.cgi +++ b/httemplate/edit/cust_bill_pay.cgi @@ -1,5 +1,5 @@ <% -# +# use strict; use vars qw( $cgi $query $custnum $paynum $amount $invnum $p1 $otaker $cust_pay ); @@ -64,7 +64,7 @@ foreach my $cust_bill ( @cust_bill ) { my $invnum = $cust_bill->invnum; my $changeto = $cust_bill->owed < $unapplied ? $cust_bill->owed - : $unapplied + : $unapplied; print <