* add missing map

diff --git a/genotypeizer b/genotypeizer
index a4f2e4193079bb4a3ba40cea31a81c78899523db..8c441cd7e41217d647b08df6cb1748e66e026ef8 100755 (executable)
--- a/genotypeizer
+++ b/genotypeizer
@@ -223,7 +223,7 @@ if ($options{output_format} eq 'pedmap') {
            join("\t",
                 @{$extra_info{$individual_id}}{qw(family_id individual_id),
                                                    qw(paternal_id maternal_id sex phenotype)},
-                keys %valid_snps ? @{$samples{$individual_id}}[@valid_snps{@snp_ordering}] : @{$samples{$individual_id}}
+                keys %valid_snps ? @{$samples{$individual_id}}[map {($_*2,$_*2+1)} @valid_snps{@snp_ordering}] : @{$samples{$individual_id}}
                )."\n";
     }
 }