projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
more card display changes
[freeside.git]
/
httemplate
/
view
/
cust_main.cgi
diff --git
a/httemplate/view/cust_main.cgi
b/httemplate/view/cust_main.cgi
index
630d9e5
..
4796481
100755
(executable)
--- a/
httemplate/view/cust_main.cgi
+++ b/
httemplate/view/cust_main.cgi
@@
-466,7
+466,7
@@
foreach my $bill (@bills) {
$payment->payinfo,
$cust_bill_pay->amount,
);
$payment->payinfo,
$cust_bill_pay->amount,
);
- $payinfo = 'x'x(length($payinfo)-4). substr($payinfo,(length($payinfo)-4))
;
+ $payinfo = 'x'x(length($payinfo)-4). substr($payinfo,(length($payinfo)-4))
if $payby eq 'CARD';
my $target = "$payby$payinfo";
$payby =~ s/^BILL$/Check #/ if $payinfo;
if $payby eq 'CARD';
my $target = "$payby$payinfo";
$payby =~ s/^BILL$/Check #/ if $payinfo;
@@
-549,7
+549,7
@@
foreach my $payment (@unapplied_payments) {
my $payby = $payment->payby;
my $payinfo = $payment->payinfo;
#false laziness w/above
my $payby = $payment->payby;
my $payinfo = $payment->payinfo;
#false laziness w/above
- $payinfo =
substr($payinfo,0,4). 'x'x(length($payinfo)-4
)
+ $payinfo =
'x'x(length($payinfo)-4). substr($payinfo,(length($payinfo)-4)
)
if $payby eq 'CARD';
my $target = "$payby$payinfo";
$payby =~ s/^BILL$/Check #/ if $payinfo;
if $payby eq 'CARD';
my $target = "$payby$payinfo";
$payby =~ s/^BILL$/Check #/ if $payinfo;