Took out _longest_ from file name, don't really need it and was just forcing me to...

svn path=/; revision=633

diff --git a/interactome_scripts/make_fasta_with_no_paralogs.pl b/interactome_scripts/make_fasta_with_no_paralogs.pl
index add9c2e68b8ed9dbbd2714e8baf9626e5698815a..1f67fdf38e4898ff4e4a00ec043d8590cb89aaf5 100755 (executable)
--- a/interactome_scripts/make_fasta_with_no_paralogs.pl
+++ b/interactome_scripts/make_fasta_with_no_paralogs.pl
@@ -127,7 +127,7 @@ foreach my $key (keys %gene_hash) {
                }
        }
 
-       my $species_longest_filename = "$species" . "_longest_" . "$ARGV[1]";
+       my $species_longest_filename = "$species" . "$ARGV[1]";
        open(SPECIESLONGFH, ">>$species_longest_filename");
        print SPECIESLONGFH ">$gene_array[$longest_gene]\n";
        for (my $pos=0; $pos < $longest_length; $pos +=80) {