From b289b0be4c67dfb577f56f4debe9d4a2a3606e76 Mon Sep 17 00:00:00 2001
From: elserj <elserj@localhost>
Date: Thu, 1 Dec 2016 03:42:09 +0000
Subject: [PATCH] Fix Mustela putorius sub species

svn path=/; revision=648
---
 interactome_scripts/find_species.pl | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/interactome_scripts/find_species.pl b/interactome_scripts/find_species.pl
index 1fe1526..097079e 100755
--- a/interactome_scripts/find_species.pl
+++ b/interactome_scripts/find_species.pl
@@ -498,7 +498,7 @@ sub find_gene {
 	}elsif ($species eq "Musa_acuminata") {
 		my ($protein,$type,$chrom,$gene_id,$transcript) = split(/\s/,$gene_header);
 		$gene = $protein;
-	}elsif ($species eq "Mustela_putorius") {
+	}elsif ($species eq "Mustela_putorius.furo") {
 		my ($isoform, $type, $scaffold, $temp_gene, $transcript, $gene_biotype, $transcript_biotype, $gene_symbol, $description) = split(/\s/, $gene_header);
 		$gene = $isoform;
 	}elsif ($species eq "Nectria_haematococca") {
@@ -916,7 +916,7 @@ sub find_gene_synonym {
 		$gene_id =~ s/gene\://;
 		$peptide =~ s/\:pep//;
 		$synonym = "$peptide,$gene_id";
-	}elsif ($species eq "Mustela_putorius") {
+	}elsif ($species eq "Mustela_putorius.furo") {
 		my ($isoform, $type, $scaffold, $temp_gene, $transcript, $gene_biotype, $transcript_biotype, $gene_symbol, $description) = split(/\s/, $gene_header);
 		$temp_gene =~ s/gene\://;
 		$transcript =~ s/transcript\://;
@@ -1183,7 +1183,7 @@ sub all_species_array {
 	push (@spec_array, "Mimulus_guttatus");
 	push (@spec_array, "Mus_musculus");
 	push (@spec_array, "Musa_acuminata");
-	push (@spec_array, "Mustela_putorius");
+	push (@spec_array, "Mustela_putorius.furo");
 	push (@spec_array, "Nectria_haematococca");
 	push (@spec_array, "Nelumbo_nucifera");
 	push (@spec_array, "Neurospora_crassa");
-- 
2.34.1