Changed the split for C.elegans since the tab in the original fasta file messes up...

svn path=/; revision=33

diff --git a/interactome_scripts/find_species.pl b/interactome_scripts/find_species.pl
index 77183d383560e6e540149a9374047ef7284f9ed0..9deb175abfde08f6524621ea1b71a19b855ce5ff 100755 (executable)
--- a/interactome_scripts/find_species.pl
+++ b/interactome_scripts/find_species.pl
@@ -110,7 +110,7 @@ sub find_gene {
                my ($name,$gene_id,$chrom,$isomer) = split(/\|/, $gene_header);
                $gene = $isomer;
        }elsif ($species eq "Caenorhabditis_elegans") {
-               my ($locus_id,$unknown,$gene_id,$temp) = split(/\s+/, $gene_header);
+               my ($locus_id,$unknown,$gene_id,$temp) = split(/\|/, $gene_header);
                $gene = $gene_id; #???
        }elsif ($species eq "Carica_papaya") {
                my $supercontig = $gene_header;