From ba0e718ef4eda9d9764d581367f8dffc555371b9 Mon Sep 17 00:00:00 2001
From: elserj <elserj@localhost>
Date: Fri, 14 Mar 2014 23:26:03 +0000
Subject: [PATCH] Added Triticum turgidum

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

diff --git a/interactome_scripts/find_species.pl b/interactome_scripts/find_species.pl
index 78079c2..a0d37a9 100755
--- a/interactome_scripts/find_species.pl
+++ b/interactome_scripts/find_species.pl
@@ -218,6 +218,8 @@ sub find_species {
 		$species = "Triticum_monococcum.DV92";
 	}elsif ($temp =~ /Triticum\_monococcum\.G3116/) {
 		$species = "Triticum_monococcum.G3116";
+	}elsif ($temp =~/Triticum\_turgidum/) {
+		$species = "Triticum_turgidum";
 	}elsif ($temp =~ /Triticum\_urartu/) {
 		$species = "Triticum_urartu";
 	}elsif ($temp =~ /Vitis\_vinifera/) {
@@ -558,6 +560,9 @@ sub find_gene {
 	}elsif ($species eq "Triticum_monococcum.G3116") {
 		my ($gene_id,$temp) = split(/\s+/,$gene_header);
 		$gene = $gene_id;
+	}elsif ($species eq "Triticum_turgidum") {
+		my ($gi,$temp,$gb,$gene_id,$strand,$start,$stop) = split(/[\|\s]+/, $gene_header);
+		$gene = $gene_id;
 	}elsif ($species eq "Triticum_urartu") {
 		my ($peptide,$temp,$chrom,$gene_id,$transcript,$gene_type,$transcript_type) = split(/\s/,$gene_header);
         $transcript =~ s/transcript\://;
@@ -943,6 +948,7 @@ sub all_species_array {
 	push (@spec_array, "Triticum_aestivum");
 	push (@spec_array, "Triticum_monococcum.DV92");
 	push (@spec_array, "Triticum_monococcum.G3116");
+	push (@spec_array, "Triticum_turgidum");
 	push (@spec_array, "Triticum_urartu");
 	push (@spec_array, "Vitis_vinifera");
 	push (@spec_array, "Zea_mays");
-- 
2.34.1