Commit 924d9559 authored by Ian Longden's avatar Ian Longden
Browse files

make sure there is a species set

parent 6923f410
......@@ -167,7 +167,12 @@ sub dump_xref{
$k++;
$method[$k] = shift @$list;
my $rest = shift @$list;
$species[$k] = $$rest[0];
if($$rest[0] eq "*"){
$species[$k] = $self->mapper->core->species;
}
else{
$species[$k] = $$rest[0];
}
$sources[$k] = $$rest[1];
if($sources[$k] eq "*"){
$all = $k;
......
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