From 6bdc7cfd3afbd3db8a3c24afd27b2d99d8db902c Mon Sep 17 00:00:00 2001 From: elserj Date: Mon, 27 Sep 2010 23:26:34 +0000 Subject: [PATCH] Fixed non-unique gene-id detection. Previous version only detected unique headers svn path=/; revision=53 --- interactome_scripts/fasta_verify.pl | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/interactome_scripts/fasta_verify.pl b/interactome_scripts/fasta_verify.pl index ac6eb84..b3c1d6a 100755 --- a/interactome_scripts/fasta_verify.pl +++ b/interactome_scripts/fasta_verify.pl @@ -52,8 +52,7 @@ while() { # set prev_line_header info for next time through loop if($curr_line_is_header) { $prev_line_is_header = 1; - #my $gene = find_gene($line,$species); - my $gene = $line; + my $gene = find_gene($line,$species); if(!defined($gene_id_hash{$gene})) { $gene_id_hash{$gene} = $line; }else{ -- 2.34.1