diff options
| author | Ivan Kohler <ivan@freeside.biz> | 2016-09-25 14:36:54 -0700 |
|---|---|---|
| committer | Ivan Kohler <ivan@freeside.biz> | 2016-09-25 14:36:54 -0700 |
| commit | f4ab9c03202d393907a195b957bbd134ca972985 (patch) | |
| tree | 26cbc6f408e192b911d4fdeb3b358b2dab89e2ae | |
| parent | fef753a00170c17020399f88751070bc03ac6173 (diff) | |
fix emailing customers on deb 7, RT#72513, RT#33316
| -rw-r--r-- | httemplate/misc/email-customers.html | 12 |
1 files changed, 7 insertions, 5 deletions
diff --git a/httemplate/misc/email-customers.html b/httemplate/misc/email-customers.html index d086c676d..b228b7202 100644 --- a/httemplate/misc/email-customers.html +++ b/httemplate/misc/email-customers.html @@ -153,13 +153,13 @@ function toggle(obj) { % # if we've already established a draft template, don't let msgnum be changed <& /elements/hidden.html, field => 'msgnum', - curr_value => ($cgi->param('msgnum') || ''), + curr_value => ( scalar($cgi->param('msgnum')) || ''), &> % } else { Template: <& /elements/select-msg_template.html, onchange => 'toggle(this)', - curr_value => ($cgi->param('msgnum') || ''), + curr_value => ( scalar($cgi->param('msgnum')) || ''), &> <BR> % } @@ -184,14 +184,14 @@ Send to contacts: 'value' => $conf->config('invoice_from_name', $agent_virt_agentnum) || $conf->config('company_name', $agent_virt_agentnum), #? 'size' => 20, - 'curr_value' => $cgi->param('from_name'), + 'curr_value' => scalar($cgi->param('from_name')), &> <\ <& /elements/input-text.html, 'field' => 'from_addr', 'type' => 'email', # HTML5, woot 'value' => $conf->config('invoice_from', $agent_virt_agentnum), 'size' => 20, - 'curr_value' => $cgi->param('from_addr'), + 'curr_value' => scalar($cgi->param('from_addr')), &>></TD> <& /elements/tr-input-text.html, @@ -361,7 +361,9 @@ if ( !$cgi->param('preview') ) { } # contact_class_X params - foreach my $param ( $cgi->multi_param ) { + #we can't switch to multi_param until we're done supporting deb 7 + local($CGI::LIST_CONTEXT_WARN) = 0; + foreach my $param ( $cgi->param ) { if ( $param =~ /^contact_class_(\w+)$/ ) { push @contact_classnum, $1; if ( $1 eq 'invoice' ) { |