geneids_by_extids now checks the dbprimary_id if the display_id returns nothing

modules/Bio/EnsEMBL/DBSQL/DBEntryAdaptor.pm

@@ -441,6 +441,19 @@ sub geneids_by_extids{
        push(@genes,$a);
    }
 
+   unless (scalar @genes){ 
+       $sth = $self->prepare("SELECT DISTINCT( tr.gene_id ) 
+		      FROM transcript tr, 
+			   Xref x, objectXref oxr
+		      WHERE tr.translation_id = oxr.ensembl_id 
+			AND oxr.xrefId = x.xrefId 
+			AND x.dbprimary_id='$name'");
+       $sth->execute();
+       while( ($a) = $sth->fetchrow_array ) {
+	   push(@genes,$a);
+       }
+   }
+
    return @genes;
 }