[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.164, Tue Oct 25 14:28:48 2005 UTC revision 1.165, Tue Oct 25 17:41:32 2005 UTC
# Line 598  Line 598 
598      if ((! $cgi->param('compare_region')) && $has_translation) {      if ((! $cgi->param('compare_region')) && $has_translation) {
599          my $link = $cgi->url(-relative => 1, -query => 1, -path_info => 1) . "&compare_region=1";          my $link = $cgi->url(-relative => 1, -query => 1, -path_info => 1) . "&compare_region=1";
600          push(@$html,"<br><a href=$link>To Compare Region</a> &nbsp;");          push(@$html,"<br><a href=$link>To Compare Region</a> &nbsp;");
601          push(@$html,"<A href=\"Html/compare_regions.html\" target=\"SEED_or_SPROUT_help\">[Help]</A><br />\n");          push(@$html,"<A href=\"Html/compare_regions.html\" class='help' target=\"SEED_or_SPROUT_help\">Help on compare regions</A>\n");
602            push(@$html, "<a href='proteinfamilies.cgi?user=$user&prot=$peg&equivalence=1'>Explore Protein Families</a><br>\n",
603            "\n<a href='Html/ProteinFamilies.html' class='help' target='help'>Help on Protein Families</a>\n");
604      } elsif ($cgi->param('compare_region')) {      } elsif ($cgi->param('compare_region')) {
605          &print_compared_regions($fig_or_sprout,$cgi,$html,$peg);          &print_compared_regions($fig_or_sprout,$cgi,$html,$peg);
606      }      }
# Line 848  Line 850 
850      }      }
851      my $col_hdrs=["Family ID<br><small>Link Investigates Family</small>", "Family Function", "Family Size"];      my $col_hdrs=["Family ID<br><small>Link Investigates Family</small>", "Family Function", "Family Size"];
852      push @$html, $cgi->br, $cgi->div({id=>"proteinfamilies"},      push @$html, $cgi->br, $cgi->div({id=>"proteinfamilies"},
853          "<a href='proteinfamilies.cgi?user=$user&prot=$peg&equivalence=1'>Explore Protein Families for $peg</a><br>\n",          "<a href='proteinfamilies.cgi?user=$user&prot=$peg&equivalence=1'>Explore Protein Families</a><br>\n",
854          "\n<a href='Html/ProteinFamilies.html' class='help' target='help'>Help on Protein Families</a>\n",          "\n<a href='Html/ProteinFamilies.html' class='help' target='help'>Help on Protein Families</a>\n",
855          &HTML::make_table($col_hdrs, $tab, "Protein Families")          &HTML::make_table($col_hdrs, $tab, "Protein Families")
856      );      );

Legend:
Removed from v.1.164  
changed lines
  Added in v.1.165

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3