2cf3578abce882ea76c4d4f1309972a07797ba4f
hiram
  Tue Feb 22 14:29:18 2022 -0800
better cleaning of sort keys for submitter strings and h1 h2 headings on intro text refs #28930

diff --git src/hg/gar/garTable.pl src/hg/gar/garTable.pl
index 0e5592a..f4ee5ed 100755
--- src/hg/gar/garTable.pl
+++ src/hg/gar/garTable.pl
@@ -1122,30 +1122,31 @@
 
   ############# tenth column,  assembly date ################
   if (defined($asmDate{$asmId})) {
     printf "<td style='display:none;'>%s</td>", $asmDate{$asmId};
     printf PC "\t%s", $asmDate{$asmId};	# output to clade.tableData.txt
   } else {
     printf "<td style='display:none;'>n/a</td>";
     printf PC "\t%s", "n/a";	# output to clade.tableData.txt
   }
 
   ############# eleventh column,  submitter ################
   $asmUrl = "https://www.ncbi.nlm.nih.gov/assembly/$accessionId";
   if (defined($asmSubmitter{$asmId})) {
     my $submitterSortKey = lc($asmSubmitter{$asmId});
     $submitterSortKey =~ s/ //g;
+    $submitterSortKey =~ s/[^a-z0-9]//ig;
     printf "<td sorttable_customkey='%s' style='display:none;'>%s</td>", substr($submitterSortKey,0,20), $asmSubmitter{$asmId};
     printf PC "\t%s", $asmSubmitter{$asmId};	# output to clade.tableData.txt
   } else {
     printf "<td sorttable_customkey='n/a' style='display:none;'>n/a</td>";
     printf PC "\t%s", "n/a";	# output to clade.tableData.txt
   }
 
   ############# twelveth column,  clade ################
   printf "<td style='display:none;'>%s</td>\n", $clade;
   printf PC "\t%s", $clade;
 
   printf PC "\n";	# finished a line output to clade.tableData.txt
   printf "</tr>\n";
   }	#	foreach my $asmId (@$cPtr)
   close (PC);	# finished with clade.tableData.txt output