From da3c886bdc311ce037de240ebb38d0b52810d167 Mon Sep 17 00:00:00 2001 From: elserj Date: Thu, 25 Jul 2013 20:07:01 +0000 Subject: [PATCH] Fix coding mistake from previous revision svn path=/; revision=495 --- interactome_scripts/species_tree_names_fix.pl | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/interactome_scripts/species_tree_names_fix.pl b/interactome_scripts/species_tree_names_fix.pl index e1e1de1..3e9060a 100755 --- a/interactome_scripts/species_tree_names_fix.pl +++ b/interactome_scripts/species_tree_names_fix.pl @@ -31,10 +31,11 @@ while (){ $spec_name =~ s/\.fasta//g; $spec_name =~ s/\.fa//g; my ($spec_genus, $spec_species) = split(/[_,.]/,$spec_name); - if ($spec_species neq "") { + if (defined($spec_species)) { $spec_name = $spec_genus . " " . $spec_species; - }else + }else{ $spec_name = $spec_genus; + } if(!defined($species_hash{$spec_id})) { $species_hash{$spec_id} = $spec_name; }else{ -- 2.34.1