From 6a56250efed2a118b2cebaedb4110c4323cd0f4f Mon Sep 17 00:00:00 2001 From: Christopher Burger Date: Tue, 26 Mar 2019 15:08:37 -0400 Subject: [PATCH] RT 82999 - fixed issue where payment receipt only sent when one email present. --- FS/FS/cust_pay.pm | 9 +++------ 1 file changed, 3 insertions(+), 6 deletions(-) diff --git a/FS/FS/cust_pay.pm b/FS/FS/cust_pay.pm index 61e5ea387..3e368f6ca 100644 --- a/FS/FS/cust_pay.pm +++ b/FS/FS/cust_pay.pm @@ -673,7 +673,7 @@ sub send_receipt { 'cust_main' => $cust_main, 'cust_bill' => $opt->{cust_bill}, 'cust_pkg' => $opt->{cust_pkg}, - 'invoicing_list' => @invoicing_list, + 'invoicing_list' => \@invoicing_list, 'msgnum' => $conf->config('payment_receipt_msgnum', $cust_main->agentnum) ); @@ -710,9 +710,6 @@ sub send_receipt { $error = $queue->insert(%opt); } - - - } warn "send_receipt: $error\n" if $error; @@ -725,7 +722,7 @@ $error = $self->send_message_receipt( 'cust_main' => $cust_main, 'cust_bill' => $opt->{cust_bill}, 'cust_pkg' => $opt->{cust_pkg}, - 'invoicing_list' => @invoicing_list, + 'invoicing_list' => \@invoicing_list, 'msgnum' => $conf->config('payment_receipt_msgnum', $cust_main->agentnum) ); @@ -736,7 +733,7 @@ sub send_message_receipt { my $cust_main = $opt{'cust_main'}; my $cust_bill = $opt{'cust_bill'}; my $cust_pkg = $opt{'cust_pkg'}; - my @invoicing_list = $opt{'invoicing_list'}; + my @invoicing_list = ref($opt{'invoicing_list'}) ? @{ $opt{'invoicing_list'} } : ( $opt{'invoicing_list'} ); my $msgnum = $opt{'msgnum'}; my $error = ''; -- 2.11.0