[Bio] / FigWebServices / close_genome_discrepancies.cgi Repository:
ViewVC logotype

Diff of /FigWebServices/close_genome_discrepancies.cgi

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

revision 1.5, Thu Jun 29 18:52:57 2006 UTC revision 1.6, Thu Jun 29 19:08:12 2006 UTC
# Line 72  Line 72 
72      my $tab;      my $tab;
73      ($peg eq $first_peg) ? ($keep=1) : 1;      ($peg eq $first_peg) ? ($keep=1) : 1;
74      next unless ($keep);      next unless ($keep);
     $last_peg=$peg;  
75      next if ($keep > $max);      next if ($keep > $max);
76        $last_peg=$peg;
77      $pegsofar++;      $pegsofar++;
78      my $fn=$fig->function_of($peg, $user);      my $fn=$fig->function_of($peg, $user);
79      my @inc=($peg);      my @inc=($peg);

Legend:
Removed from v.1.5  
changed lines
  Added in v.1.6

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3