Commit 5c611bde authored by Ian Longden's avatar Ian Longden
Browse files

missed a lower case forcing of species. Now fixed

parent b5db57ae
...@@ -621,7 +621,7 @@ sub get_all_adaptors{ ...@@ -621,7 +621,7 @@ sub get_all_adaptors{
} }
else{ else{
foreach my $dba (@{$registry_register{'_DBA'}}){ foreach my $dba (@{$registry_register{'_DBA'}}){
foreach my $ty (@{$registry_register{$dba->species}{'list'}}){ foreach my $ty (@{$registry_register{lc($dba->species)}{'list'}}){
$type_hash{lc($ty)} = 1; $type_hash{lc($ty)} = 1;
} }
} }
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment