X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fmisc%2Femail-customers.html;h=4e4c15f2a146b00e17982237e362d66631bb804a;hb=a6bd5190b8b5434c6b59517fc6467491e00e2edb;hp=0d3d622c312d78372e4cde467754b83cee21ce26;hpb=7153190ee1bfeb6d3ad9e6da270a41a949333a7e;p=freeside.git

diff --git a/httemplate/misc/email-customers.html b/httemplate/misc/email-customers.html
index 0d3d622c3..4e4c15f2a 100644
--- a/httemplate/misc/email-customers.html
+++ b/httemplate/misc/email-customers.html
@@ -4,7 +4,7 @@
 % foreach my $key ( keys %search ) {
 %   my @values = ref($search{$key}) ? @{$search{$key}} : ( $search{$key} );
 %   foreach my $value ( @values ) {
-      <INPUT TYPE="hidden" NAME="<% $key |h %>" VALUE="<% $value |h %>">
+      <INPUT TYPE="hidden" NAME="<% $key %>" VALUE="<% $value %>">
 %   }
 % }
 
@@ -126,13 +126,13 @@ die "access denied"
 my %search = $cgi->Vars;
 delete $search{$_} for qw( magic from subject html_body text_body );
 $search{$_} = [ split(/\0/, $search{$_}) ]
-  foreach grep $search{$_} =~ /\0/, keys %search;
+  foreach grep { $_ eq 'payby' || $search{$_} =~ /\0/ } keys %search;
 
 my $title = 'Bulk send customer notices';
 
 my $num_cust;
 if ( $cgi->param('magic') eq 'preview' ) {
-  my $sql_query = FS::cust_main->search_sql(\%search);
+  my $sql_query = FS::cust_main->search(\%search);
   my $count_query = delete($sql_query->{'count_query'});
   my $count_sth = dbh->prepare($count_query)
     or die "Error preparing $count_query: ". dbh->errstr;