diff options
Diffstat (limited to 'httemplate/search/contact.html')
| -rw-r--r-- | httemplate/search/contact.html | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/httemplate/search/contact.html b/httemplate/search/contact.html index 4b3fe83..24cb237 100644 --- a/httemplate/search/contact.html +++ b/httemplate/search/contact.html @@ -243,10 +243,15 @@ for my $col (@report) { my $classnum_url_part; if (@classnum) { - $classnum_url_part = join '', map{ "&classnums=$_" } @classnum, @dest; + $classnum_url_part = join '', map{ "&classnums=$_" } @classnum; $classnum_url_part .= '&classnums=0' if $classnum_null; } +my $dest_url_part; +if (@dest) { + $dest_url_part = join '', map{ "&dest=$_" } @dest; +} + # E-mail pipeline, from email-customers.html through to email queue job, # doesn't support cust_prospect table my $send_email_link = undef; @@ -262,6 +267,7 @@ if ($link eq 'cust_main') { '&refnum=1'. '&with_email=on'. $classnum_url_part. + $dest_url_part. "\">Email a notice to these customers</a>"; } |