summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorivan <ivan>2009-06-22 23:42:19 +0000
committerivan <ivan>2009-06-22 23:42:19 +0000
commit961ed0b05abcd9c9180d4c91ef4dd75cca4e3eb2 (patch)
tree777c0270a9dda58304839c4ffaf609fd056384ef
parent5479fdb0844b77cbc313a1ab4135d769b034d981 (diff)
fix using encryption produces non-decrypted data in payment receipts, RT#5536
-rw-r--r--FS/FS/cust_pay.pm8
1 files changed, 6 insertions, 2 deletions
diff --git a/FS/FS/cust_pay.pm b/FS/FS/cust_pay.pm
index 0caba7574..201b427aa 100644
--- a/FS/FS/cust_pay.pm
+++ b/FS/FS/cust_pay.pm
@@ -216,11 +216,15 @@ sub insert {
my $payby = $self->payby;
my $payinfo = $self->payinfo;
$payby =~ s/^BILL$/Check/ if $payinfo;
- $payinfo = $self->paymask if $payby eq 'CARD' || $payby eq 'CHEK';
+ if ( $payby eq 'CARD' || $payby eq 'CHEK' ) {
+ $payinfo = $self->paymask
+ } else {
+ $payinfo = $self->decrypt($payinfo);
+ }
$payby =~ s/^CHEK$/Electronic check/;
$error = send_email(
- 'from' => $conf->config('invoice_from', $self->cust_main->agentnum),
+ 'from' => $conf->config('invoice_from', $cust_main->agentnum),
#invoice_from??? well as good as any
'to' => \@invoicing_list,
'subject' => 'Payment receipt',