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

Diff of /FigWebServices/subsystem_server_sapling.cgi

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

revision 1.7, Thu Jul 23 18:17:37 2009 UTC revision 1.8, Thu Aug 6 20:04:24 2009 UTC
# Line 122  Line 122 
122          my $result = [];          my $result = [];
123          my (@args)  = &YAML::Load($cgi->param('args'));          my (@args)  = &YAML::Load($cgi->param('args'));
124          my $subsys = $args[0];          my $subsys = $args[0];
125          my @roles = @{$args[1]};          my @roles = @{$args[1]->[0]};
126          my $ss = SaplingSubsys->new($subsys, $sapling);          my $ss = SaplingSubsys->new($subsys, $sapling);
127          foreach my $role (@roles) {          foreach my $role (@roles) {
128                  my @pegs = $ss->pegs_for_role($role);                  my @pegs = $ss->pegs_for_role($role);

Legend:
Removed from v.1.7  
changed lines
  Added in v.1.8

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3