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;
'&refnum=1'.
'&with_email=on'.
$classnum_url_part.
+ $dest_url_part.
"\">Email a notice to these customers</a>";
}