Fixed gene detection in C.elegans

svn path=/; revision=76

diff --git a/interactome_scripts/find_species.pl b/interactome_scripts/find_species.pl
index 7962816e9b56ea7f5cdfa3b404413483ac68643f..579482f5a5fb2942efdd3b2062da575a8787c946 100755 (executable)
--- a/interactome_scripts/find_species.pl
+++ b/interactome_scripts/find_species.pl
@@ -129,7 +129,7 @@ sub find_gene {
                $gene = $isomer;
        }elsif ($species eq "Caenorhabditis_elegans") {
                my ($locus_id,$unknown,$gene_id,$temp) = split(/\|/, $gene_header);
-               $gene = $gene_id; #???
+               $gene = $locus_id; #???
        }elsif ($species eq "Carica_papaya") {
                my $supercontig = $gene_header;
                $gene = $supercontig;