diff --git a/etc/reapply_species_strain_map.pl b/etc/reapply_species_strain_map.pl index 7609ec7be..511327ca8 100755 --- a/etc/reapply_species_strain_map.pl +++ b/etc/reapply_species_strain_map.pl @@ -62,7 +62,8 @@ sub make_strain_key { my $strain = shift; - return $strain->organism_id() . '-' . $strain->strain_name(); + return $strain->organism_id() . '-' . + ($strain->track_strain_id() // $strain->strain_name()); } my $proc = sub {