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

Diff of /Sprout/SproutSubsys.pm

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

revision 1.12, Thu Dec 6 14:50:08 2007 UTC revision 1.13, Sun Mar 23 16:34:17 2008 UTC
# Line 112  Line 112 
112      # Declare the return value.      # Declare the return value.
113      my $retVal;      my $retVal;
114      # Get the subsystem's data fields.      # Get the subsystem's data fields.
115      my ($curator, $notes) = $sprout->GetEntityValues('Subsystem', $subName, ['Subsystem(curator)',      my ($curator, $notes, $description) = $sprout->GetEntityValues('Subsystem', $subName,
116                                                                               'Subsystem(notes)']);                                                                     ['Subsystem(curator)', 'Subsystem(notes)',
117                                                                        'Subsystem(description)']);
118      # Only proceed if we found the subsystem.      # Only proceed if we found the subsystem.
119      if (defined $curator) {      if (defined $curator) {
120          # Get the genome IDs and variant codes for the rows. The list returned          # Get the genome IDs and variant codes for the rows. The list returned
# Line 395  Line 396 
396      return $self->{notes};      return $self->{notes};
397  }  }
398    
399    =head3 get_description
400    
401        my $text = $sub->get_description();
402    
403    Return the description for this subsystem.
404    
405    =cut
406    
407    sub get_description
408    {
409        my($self) = @_;
410        return $self->{description};
411    }
412    
413  =head3 get_roles  =head3 get_roles
414    
415      my @roles = $sub->get_roles();      my @roles = $sub->get_roles();

Legend:
Removed from v.1.12  
changed lines
  Added in v.1.13

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3