summaryrefslogtreecommitdiff
path: root/FS/FS/msg_template
diff options
context:
space:
mode:
authorMark Wells <mark@freeside.biz>2016-05-03 13:49:22 -0700
committerMark Wells <mark@freeside.biz>2016-05-03 13:49:22 -0700
commitd84ed22f08e1a0c5fe0efdd6446fd9e330a06838 (patch)
treee3747abfe8c9438ae06c66f4ab13a7228fc20739 /FS/FS/msg_template
parent770d8237cda1b6459962d31f6ae86997ad5843be (diff)
fix fallback to invoice recipients, #33316
Diffstat (limited to 'FS/FS/msg_template')
-rw-r--r--FS/FS/msg_template/email.pm21
1 files changed, 8 insertions, 13 deletions
diff --git a/FS/FS/msg_template/email.pm b/FS/FS/msg_template/email.pm
index d1df5d6..cc5428b 100644
--- a/FS/FS/msg_template/email.pm
+++ b/FS/FS/msg_template/email.pm
@@ -294,19 +294,14 @@ sub prepare {
} elsif ( $cust_main ) {
- if ( $opt{'to_contact_classnum'} ) {
-
- my $classnum = $opt{'to_contact_classnum'};
- my @classes = ref($classnum) ? @$classnum : split(',', $classnum);
- if ( !@classes ) {
- # traditional behavior: send to invoice email destinations (only)
- @classes = ( 'invoice' );
- }
- @to = $cust_main->contact_list_email(@classes);
- # not guaranteed to produce contacts, but then customers aren't
- # guaranteed to have email addresses on file. in that case, env_to
- # will be null and sending this message will fail.
- }
+ my $classnum = $opt{'to_contact_classnum'} || '';
+ my @classes = ref($classnum) ? @$classnum : split(',', $classnum);
+ # traditional behavior: send to all invoice recipients
+ @classes = ('invoice') unless @classes;
+ @to = $cust_main->contact_list_email(@classes);
+ # not guaranteed to produce contacts, but then customers aren't
+ # guaranteed to have email addresses on file. in that case, env_to
+ # will be null and sending this message will fail.
} else {
die 'no To: address or cust_main object specified';