Fixed bug in orthograph2hamstrad that prevented summarized data to be…

… converted
mptrsen · Nov 23, 2015 · a121c13 · a121c13
1 parent c856653
commit a121c13
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 2 deletions.
diff --git a/ChangeLog b/ChangeLog
@@ -1,6 +1,7 @@
 Changes since release 0.5.6
 ===========================
 
+* Fixed bug in orthograph2hamstrad.pl that prevented summarized data to be converted
 * Moved notification on reftaxon skipping to `verbose`, improved wording on said message
 * Alignment files for ortholog set now contain the reference OGS headers, not just database IDs
 

diff --git a/orthograph2hamstrad.pl b/orthograph2hamstrad.pl
@@ -45,8 +45,8 @@
 	next unless $f =~ /\.fa$/;
 	(my $basename = $f) =~ s/\.aa(\.summarized)?(\.mafft)?\.fa$//;
 
-	my $summarized = defined $1 ? '.' . $1 : '';
-	my $mafft      = defined $2 ? '.' . $2 : '';
+	my $summarized = defined $1 ? $1 : '';
+	my $mafft      = defined $2 ? $2 : '';
 
 	my $aafile = catfile($aaind, $f);
 	my $ntfile = catfile($ntind, $basename . '.nt' . $summarized . $mafft . '.fa');