Changeset 234

Show
Ignore:
Timestamp:
07/14/09 12:05:38 (4 months ago)
Author:
cholt
Message:

fix zff converter

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved

  • bin/maker2zff.pl

    r233 r234  
    137137    my @qual = (@q[1..5],$q[8]); 
    138138    my $hc = 1; 
    139     foreach my $i (0..5) { 
    140         if ($qual[$i] <= $thresh[$i]) { 
     139    foreach my $i (0..4) { 
     140        if ($qual[$i] < $thresh[$i]) { 
    141141            $hc = 0; 
    142142        }