[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.1, Sun Dec 5 14:01:53 2004 UTC revision 1.2, Sun Dec 5 16:35:16 2004 UTC
# Line 65  Line 65 
65  sub format_ssa_table {  sub format_ssa_table {
66      my($cgi,$html,$ssaP) = @_;      my($cgi,$html,$ssaP) = @_;
67    
68        my $user = $cgi->param('user');
69        $user = $user ? $user : "";
70      push(@$html, $cgi->start_form(-action => "check_subsys.cgi",      push(@$html, $cgi->start_form(-action => "check_subsys.cgi",
71                                    -method => 'post'),                                    -method => 'post'),
72                   $cgi->hidden(-name => 'request', -value => 'check_ssa', -override => 1),                   $cgi->hidden(-name => 'request', -value => 'check_ssa', -override => 1),
73                     $cgi->hidden(-name => 'user', -value => "$user", -override => 1),
74                   $cgi->scrolling_list( -name   => 'subsystem',                   $cgi->scrolling_list( -name   => 'subsystem',
75                                         -values => [ map { $_->[0] } @$ssaP ],                                         -values => [ map { $_->[0] } @$ssaP ],
76                                         -size   => 10                                         -size   => 10
# Line 128  Line 131 
131          }          }
132      }      }
133      push(@$html,&HTML::make_table($col_hdrs,$tab1,"PEGs IN Subsystem with MISMATCHING Functions"));      push(@$html,&HTML::make_table($col_hdrs,$tab1,"PEGs IN Subsystem with MISMATCHING Functions"));
134        push(@$html,$cgi->hr,$cgi->br,$cgi->br);
135    
136      push(@$html,&HTML::make_table($col_hdrs,$tab2,"PEGs NOT in Subsystem with MATCHING Functions"));      push(@$html,&HTML::make_table($col_hdrs,$tab2,"PEGs NOT in Subsystem with MATCHING Functions"));
137  }  }

Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3