Added potato

svn path=/; revision=182

diff --git a/interactome_scripts/find_species.pl b/interactome_scripts/find_species.pl
index a3f9be66abf3ccf743124dc2bd88fbe3e2f2f68a..0828d95a4549c1d0fc734c9e158687772fa1bff1 100755 (executable)
--- a/interactome_scripts/find_species.pl
+++ b/interactome_scripts/find_species.pl
@@ -101,6 +101,8 @@ sub find_species {
                $temp = "Schizosaccharomyces_pombe";
        }elsif ($temp =~ /Selaginella/) {
                $temp = "Selaginella_moellendorffii";
+       }elsif ($temp =~ /Solanum_tuberosum/) {
+                       $temp = "Solanum_tuberosum";
        }elsif ($temp =~ /Sorghum/) {
                $temp = "Sorghum_bicolor";
        }elsif ($temp =~ /Synechocystis/) {
@@ -264,6 +266,9 @@ sub find_gene {
        }elsif ($species eq "Selaginella_moellendorffii") {
                my ($name,$locus_id,$chrom_id,$prot_id) = split(/\|/,$gene_header);
                $gene = $prot_id; #???
+       }elsif ($species eq "Solanum_tuberosum") {
+               my ($protein,$transcript,$type) = split(/\s/,$gene_header);
+               $gene = $protein;
        }elsif ($species eq "Sorghum_bicolor") {
                my ($gene_id,$transcript_id) = split(/\|/,$gene_header);
                $gene = $transcript_id;
@@ -350,6 +355,7 @@ sub all_species_array {
        push (@spec_array, "Saccharomyces_cerevisiae");
        push (@spec_array, "Schizosaccharomyces_pombe");
        push (@spec_array, "Selaginella_moellendorffii");
+       push (@spec_array, "Solanum_tuberosum");
        push (@spec_array, "Sorghum_bicolor");
        push (@spec_array, "Synechocystis_pcc6803");
        push (@spec_array, "Theobroma_cacao");