Mercurial > repos > miller-lab > snp_analysis_conversion

changeset 3:edf12470a1a6 default tip

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Bugfix from Belinda, in vcf2pgSnp.pl
author Cathy Riemer <cathy+hg@bx.psu.edu>
date Thu, 19 Mar 2015 12:06:34 -0400
parents 35c20b109be5
children
files vcf2pgSnp.pl vcf2pgSnp.xml
diffstat 2 files changed, 3 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/vcf2pgSnp.pl	Tue May 28 17:54:02 2013 -0400
+++ b/vcf2pgSnp.pl	Thu Mar 19 12:06:34 2015 -0400
@@ -13,7 +13,7 @@
    $stCol = shift @ARGV;
    $in = shift @ARGV;
    if ($stCol eq 'all') { $stCol = 10; }
-   else { $endCol = $stCol; }
+   else {  $endCol = $stCol - 1; }  #want 0 based column number
    $stCol--; #go from 1 based to zero based column number
    if ($stCol < 9) { 
       print "ERROR genotype fields don't start until column 10\n";
@@ -21,7 +21,7 @@
    }
 }elsif (@ARGV && scalar @ARGV == 1) {
    $in = shift @ARGV;
-}elsif (@ARGV) {
+}else {
    print "usage: vcf2pgSnp.pl [indColNum default=all] file.vcf > file.pgSnp\n";
    exit;
 }
--- a/vcf2pgSnp.xml	Tue May 28 17:54:02 2013 -0400
+++ b/vcf2pgSnp.xml	Thu Mar 19 12:06:34 2015 -0400
@@ -1,4 +1,4 @@
-<tool id="vcf2pgSnp" name="VCF to pgSnp" version="1.0.0" hidden="false">
+<tool id="vcf2pgSnp" name="VCF to pgSnp" version="1.1.0" hidden="false">
   <description>: Convert from VCF to pgSnp format</description>
   <command interpreter="perl">
     #if $inType.how == "all" #vcf2pgSnp.pl all $input1 > $out_file1