diff options
| author | mark <mark> | 2010-09-22 23:04:32 +0000 |
|---|---|---|
| committer | mark <mark> | 2010-09-22 23:04:32 +0000 |
| commit | 523edd344793bba1c53a622dcc618e74a962bcb6 (patch) | |
| tree | e9cef77a51cd9dc0c282838828deda99b1ca692a /FS/FS/msg_template.pm | |
| parent | a5713014d58b2a6f4d5f795fbda6aa50126c2afb (diff) | |
event action to send a notice to a fixed address, RT#8209
Diffstat (limited to 'FS/FS/msg_template.pm')
| -rw-r--r-- | FS/FS/msg_template.pm | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/FS/FS/msg_template.pm b/FS/FS/msg_template.pm index 50298d2..7321351 100644 --- a/FS/FS/msg_template.pm +++ b/FS/FS/msg_template.pm @@ -168,6 +168,11 @@ Customer object (required). Additional context object (currently, can be a cust_main, cust_pkg, cust_bill, svc_acct, cust_pay, or cust_pay_pending object). +=item to + +Destination address. The default is to use the customer's +invoicing_list addresses. + =back =cut @@ -247,7 +252,7 @@ sub prepare { # and email ### - my @to = $cust_main->invoicing_list_emailonly; + my @to = ($opt{'to'}) || $cust_main->invoicing_list_emailonly; warn "prepared msg_template with no email destination (custnum ". $cust_main->custnum.")\n" if !@to; @@ -311,6 +316,7 @@ sub substitutions { num_cancelled_pkgs num_ncancelled_pkgs num_pkgs classname categoryname balance + credit_limit invoicing_list_emailonly cust_status ucfirst_cust_status cust_statuscolor |