Commit 9f8ec1cf authored by Ian Longden's avatar Ian Longden
Browse files

MGI have added -ps to psuedo gene names but havana have not doen this yet so...

MGI have added -ps to psuedo gene names but havana have not doen this yet so check for this when getting descriptions etc
parent 6b6a7b98
......@@ -908,9 +908,16 @@ FSQL
}
# -ps added as MGI have added -ps to the pseudo genes but vega has not caught
# up with this yet so check for this.
foreach my $name (keys %name_count){
my $id = $display_label_to_id{$name};
my $desc = $display_label_to_desc{$name};
if(!defined($id) and defined($display_label_to_id{$name."-ps"})){
$id = $display_label_to_id{$name."-ps"};
$desc = $display_label_to_desc{$name."-ps"};
}
if(!defined($id)){
$id = $name;
print STDERR "Warning Could not find id for $name\n";
......
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