[Bio] / FigKernelPackages / ANNO.pm Repository:
ViewVC logotype

Diff of /FigKernelPackages/ANNO.pm

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

revision 1.4, Thu Mar 25 16:05:50 2010 UTC revision 1.5, Fri May 21 16:08:22 2010 UTC
# Line 120  Line 120 
120      my $id_display = 1;      my $id_display = 1;
121      map {push(@{$big{$_->[0]}}, $_->[1])} @id_roles;      map {push(@{$big{$_->[0]}}, $_->[1])} @id_roles;
122      my @resultRows = $sapling->GetAll("Subsystem Includes Role",      my @resultRows = $sapling->GetAll("Subsystem Includes Role",
123                              'ORDER BY Subsystem(id), Includes(sequence)', [],                              'Subsystem(usable) = ? ORDER BY Subsystem(id), Includes(sequence)',
124                              [qw(Subsystem(id) Role(id) Includes(abbreviation))]);                              [1], [qw(Subsystem(id) Role(id) Includes(abbreviation))]);
125      my %ss_roles;      my %ss_roles;
126      foreach my $row (@resultRows) {      foreach my $row (@resultRows) {
127          my ($sub, $role, $abbr) = @$row;          my ($sub, $role, $abbr) = @$row;

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

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3