only use refseqs, ignore embl etc

misc-scripts/xref_mapping/XrefParser/RGDParser.pm

@@ -44,7 +44,7 @@ sub run {
   }
 
 
-  my (%genbank) = %{XrefParser::BaseParser->get_valid_codes("EMBL",$species_id)};
+#  my (%genbank) = %{XrefParser::BaseParser->get_valid_codes("EMBL",$species_id)};
   my (%refseq) = %{XrefParser::BaseParser->get_valid_codes("refseq",$species_id)};
 
   open(RGD,"<".$file) || die "Could not open $file\n";
@@ -60,7 +60,7 @@ sub run {
     my @array = split (/\t/,$_);
     my $xref=undef; 
     $xref=$refseq{$array[0]} if defined($refseq{$array[0]});
-    $xref=$genbank{$array[0]}  if defined($genbank{$array[0]});
+#    $xref=$genbank{$array[0]}  if defined($genbank{$array[0]});
     if(defined($xref)){
       XrefParser::BaseParser->add_to_xrefs($xref,"RGD:".$array[2],"",$array[1],"","",$source_id,$species_id);
       $count++;