Make sure in alphabetical order and add new species

svn path=/; revision=221

diff --git a/interactome_scripts/find_species.pl b/interactome_scripts/find_species.pl
index 0828d95a4549c1d0fc734c9e158687772fa1bff1..e1e25b4d388f0fa902962045f82a80ed50442ffc 100755 (executable)
--- a/interactome_scripts/find_species.pl
+++ b/interactome_scripts/find_species.pl
@@ -71,12 +71,12 @@ sub find_species {
                $temp = "Mimulus_guttatus";
        }elsif ($temp =~ /Mus\_musculus/) {
                $temp = "Mus_musculus";
+       }elsif ($temp =~ /Nectria\_haematococca/) {
+               $temp = "Nectria_haematococca";
        }elsif ($temp =~ /Neurospora/) {
                $temp = "Neurospora_crassa";
        }elsif ($temp =~ /Nostoc/) {
                $temp = "Nostoc_punctiforme";
-       }elsif ($temp =~ /Nectria\_haematococca/) {
-               $temp = "Nectria_haematococca";
        }elsif ($temp =~ /Oryza\_sativa/) {
                $temp = "Oryza_sativa";
        }elsif ($temp =~ /Pediculus/) {
@@ -220,12 +220,12 @@ sub find_gene {
        }elsif ($species eq "Mus_musculus") {
                my ($protein,$type,$chrom,$gene_id,$transcript) = split(/\s/,$gene_header);
                $gene = $protein;
-       }elsif ($species eq "Neurospora_crassa") {
-               my ($transcript,$gene_id,$temp) = split(/\s\|\s/,$gene_header);
-               $gene = $transcript;
        }elsif ($species eq "Nectria_haematococca") {
                my ($source, $spec, $int_id, $gene_id) = split(/\|/, $gene_header);
                $gene = $gene_id;
+       }elsif ($species eq "Neurospora_crassa") {
+               my ($transcript,$gene_id,$temp) = split(/\s\|\s/,$gene_header);
+               $gene = $transcript;
        }elsif ($species eq "Nostoc_punctiforme") {
                my ($temp,$transcript,$source,$gene_id,$func) = split(/\|/, $gene_header);
                $gene = $transcript;
@@ -340,8 +340,8 @@ sub all_species_array {
        push (@spec_array, "Medicago_truncatula");
        push (@spec_array, "Mimulus_guttatus");
        push (@spec_array, "Mus_musculus");
-       push (@spec_array, "Neurospora_crassa");
        push (@spec_array, "Nectria_haematococca");
+       push (@spec_array, "Neurospora_crassa");
        push (@spec_array, "Nostoc_punctiforme");
        push (@spec_array, "Oryza_sativa");
        push (@spec_array, "Pediculus_humanus");