Issue #187 | fix cut+paste error, restore FORMAT defs

tseemann · Aug 15, 2018 · 284ee36 · 284ee36
1 parent c2b119c
commit 284ee36
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/bin/snippy-vcf_extract_subs b/bin/snippy-vcf_extract_subs
@@ -25,7 +25,7 @@ my @keep_info = split m/,/, $info_tags;
 my %keep_info = (map { $_ => 1 } @keep_info);
 
 my @keep_format = split m/,/, $format_tags;
-my %keep_format = (map { $_ => 1 } @keep_info);
+my %keep_format = (map { $_ => 1 } @keep_format);
 
 # . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
 # Main

diff --git a/perl5/Snippy/Version.pm b/perl5/Snippy/Version.pm
@@ -4,7 +4,7 @@ use base Exporter;
 @EXPORT_OK = qw(version);
 %EXPORT_TAGS = ( 'all' =>  [ @EXPORT_OK ] );
 
-our $VERSION = "4.0.4";
+our $VERSION = "4.0.5";
 
 use strict;
 use File::Basename;