[Bio] / Sprout / SproutLoad.pm Repository:
ViewVC logotype

Diff of /Sprout/SproutLoad.pm

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

revision 1.63, Wed Aug 2 23:51:19 2006 UTC revision 1.64, Sat Aug 12 08:43:37 2006 UTC
# Line 738  Line 738 
738                  my $curator = $sub->get_curator();                  my $curator = $sub->get_curator();
739                  my $notes = $sub->get_notes();                  my $notes = $sub->get_notes();
740                  $loadSubsystem->Put($subsysID, $curator, $notes);                  $loadSubsystem->Put($subsysID, $curator, $notes);
741                  my $class = $fig->subsystem_classification($subsysID);                  my $classList = $fig->subsystem_classification($subsysID);
742                  if ($class) {                  my @classes = @$classList;
743                    if (@classes) {
744                        for my $class (@classes) {
745                      $loadSubsystemClass->Put($subsysID, $class);                      $loadSubsystemClass->Put($subsysID, $class);
746                  }                  }
747                    }
748                  # Connect it to its roles. Each role is a column in the subsystem spreadsheet.                  # Connect it to its roles. Each role is a column in the subsystem spreadsheet.
749                  for (my $col = 0; defined($roleID = $sub->get_role($col)); $col++) {                  for (my $col = 0; defined($roleID = $sub->get_role($col)); $col++) {
750                      # Connect to this role.                      # Connect to this role.

Legend:
Removed from v.1.63  
changed lines
  Added in v.1.64

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3