a3221ce060e8efe2e9ef46392625606896f64f96
hiram
  Fri May 8 23:06:59 2020 -0700
do not print links to other assembly hubs from VGP index pages refs #23734

diff --git src/hg/makeDb/doc/asmHubs/mkGenomes.pl src/hg/makeDb/doc/asmHubs/mkGenomes.pl
index f0fc827..0bf16e8 100755
--- src/hg/makeDb/doc/asmHubs/mkGenomes.pl
+++ src/hg/makeDb/doc/asmHubs/mkGenomes.pl
@@ -1,33 +1,32 @@
 #!/usr/bin/env perl
 
 use strict;
 use warnings;
 use File::Basename;
 
 my $argc = scalar(@ARGV);
 if ($argc != 2) {
   printf STDERR "mkGenomes.pl Name asmName\n";
-  printf STDERR "e.g.: mkAsmStats Mammals mammals\n";
+  printf STDERR "e.g.: mkGenomes.pl Mammals mammals\n";
   exit 255;
 }
 my $Name = shift;
 my $asmHubName = shift;
 
 my %betterName;	# key is asmId, value is common name
 my $srcDocDir = "${asmHubName}AsmHub";
-my $buildDir = "/hive/data/genomes/asmHubs/refseqBuild";
 my $destDir = "/hive/data/genomes/asmHubs/$asmHubName";
 
 my $home = $ENV{'HOME'};
 my $toolsDir = "$home/kent/src/hg/makeDb/doc/asmHubs";
 my $commonNameList = "$asmHubName.asmId.commonName.tsv";
 my $commonNameOrder = "$asmHubName.commonName.asmId.orderList.tsv";
 
 open (FH, "<$toolsDir/${commonNameList}") or die "can not read $toolsDir/${commonNameList}";
 while (my $line = <FH>) {
   next if ($line =~ m/^#/);
   chomp $line;
   my ($asmId, $name) = split('\t', $line);
   $betterName{$asmId} = $name;
 }
 close (FH);