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

Diff of /FigWebServices/protein.cgi

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

revision 1.90, Sat Feb 26 00:50:37 2005 UTC revision 1.91, Sat Feb 26 11:01:13 2005 UTC
# Line 270  Line 270 
270      if (@coup != 1) {      if (@coup != 1) {
271                  push(@$html,"<h1>Sorry, no evidence that $peg is coupled to $to</h1>\n");                  push(@$html,"<h1>Sorry, no evidence that $peg is coupled to $to</h1>\n");
272      } else {      } else {
273                  my $col_hdrs = ["Peg1","Organism1","Function1","Peg2","Organism2","Function2"];                  my $col_hdrs = ["Peg1","Function1","Peg2","Function2","Organism"];
274                  my $tab = [];                  my $tab = [];
275          foreach $pair (@{$coup[0]->[2]}) {          foreach $pair (@{$coup[0]->[2]}) {
276                  ($peg1,$peg2) = @$pair;                  ($peg1,$peg2) = @$pair;
277                  $link1 = &HTML::fid_link($cgi,$peg1);                  $link1 = &HTML::fid_link($cgi,$peg1);
278                  $link2 = &HTML::fid_link($cgi,$peg2);                  $link2 = &HTML::fid_link($cgi,$peg2);
279                  push( @$tab, [ $link1,                  push( @$tab, [ $link1,
                                            &org_of($fig_or_sprout,$peg1),  
280                                             scalar &function_ofS($fig_or_sprout,$peg1,$user),                                             scalar &function_ofS($fig_or_sprout,$peg1,$user),
281                                                     $link2,                                                     $link2,
282                             &org_of($fig_or_sprout,$peg2),                                 scalar &function_ofS($fig_or_sprout,$peg2,$user),
283                             scalar &function_ofS($fig_or_sprout,$peg2,$user)                                 &org_of($fig_or_sprout,$peg1)
284                           ]                           ]
285                  );                  );
286          }          }

Legend:
Removed from v.1.90  
changed lines
  Added in v.1.91

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3