summaryrefslogtreecommitdiff
path: root/FS/FS/Misc.pm
diff options
context:
space:
mode:
authorMark Wells <mark@freeside.biz>2014-03-04 17:57:14 -0800
committerMark Wells <mark@freeside.biz>2014-03-04 17:57:24 -0800
commit4c11454b932bb5cc58ad6405949c815beebc3278 (patch)
tree9a54a751079d1e45d306eb090318156f8fe6dfe8 /FS/FS/Misc.pm
parent13445756ae5d37e95649004c047e9376d3070700 (diff)
log_sent_mail logs emailed invoices and receipts as well as msg_template messages, #25630
Diffstat (limited to 'FS/FS/Misc.pm')
-rw-r--r--FS/FS/Misc.pm5
1 files changed, 3 insertions, 2 deletions
diff --git a/FS/FS/Misc.pm b/FS/FS/Misc.pm
index 9c18961..c598507 100644
--- a/FS/FS/Misc.pm
+++ b/FS/FS/Misc.pm
@@ -267,7 +267,7 @@ sub send_email {
}
# Logging
- if ( $conf->exists('log_sent_mail') and $options{'custnum'} ) {
+ if ( $conf->exists('log_sent_mail') ) {
my $cust_msg = FS::cust_msg->new({
'env_from' => $options{'from'},
'env_to' => join(', ', @to),
@@ -278,6 +278,7 @@ sub send_email {
'custnum' => $options{'custnum'},
'msgnum' => $options{'msgnum'},
'status' => ($error ? 'failed' : 'sent'),
+ 'msgtype' => $options{'msgtype'},
});
$cust_msg->insert; # ignore errors
}
@@ -337,7 +338,7 @@ sub generate_email {
my $me = '[FS::Misc::generate_email]';
- my @fields = qw(from to bcc subject custnum msgnum);
+ my @fields = qw(from to bcc subject custnum msgnum msgtype);
my %return;
@return{@fields} = @args{@fields};