[Bio] / FigKernelScripts / parse_genbank.pl Repository:
ViewVC logotype

Diff of /FigKernelScripts/parse_genbank.pl

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.9, Fri Jul 16 21:54:14 2004 UTC revision 1.10, Wed Jun 22 01:18:03 2005 UTC
# Line 232  Line 232 
232                  $n++;                  $n++;
233              }              }
234          }          }
235    
236          if ($locS =~ /^\[(\d+)\]$/)          if ($locS =~ /^\[(\d+)\]$/)
237          {          {
238              $loc = &conv(\@pieces,$1,$contigID);              $loc = &conv(\@pieces,$1,$contigID);
# Line 243  Line 244 
244          }          }
245    
246          my @locs = split(/,/,$loc);          my @locs = split(/,/,$loc);
247          &trim_stop(\@locs);  #...STOP is now included, so don't trim it off...
248    #       &trim_stop(\@locs);
249          $loc = join(",",@locs);          $loc = join(",",@locs);
250      }      }
251      else      else

Legend:
Removed from v.1.9  
changed lines
  Added in v.1.10

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3