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

Diff of /FigWebServices/check_subsys.cgi

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

revision 1.14, Mon Jan 1 00:04:54 2007 UTC revision 1.15, Mon Jan 1 00:09:07 2007 UTC
# Line 187  Line 187 
187      my @to_add = grep { $_->[1] eq 'maybe-add' } @checked;      my @to_add = grep { $_->[1] eq 'maybe-add' } @checked;
188    
189      my($entry,$vcodes,$genome,$gs,@roles);      my($entry,$vcodes,$genome,$gs,@roles);
190      foreach $entry (sort { $a->[3] cmp $b->[5] } @to_add)      foreach $entry (sort { $a->[5] cmp $b->[5] } @to_add)
191      {      {
192          (undef,undef,undef,$vcodes,$genome,$gs,@roles) = @$entry;          (undef,undef,undef,$vcodes,$genome,$gs,@roles) = @$entry;
193          push(@$tab3,[$genome,$gs,$vcodes,join("<br>",@roles)]);          push(@$tab3,[$genome,$gs,$vcodes,join("<br>",@roles)]);

Legend:
Removed from v.1.14  
changed lines
  Added in v.1.15

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3