[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.57, Wed Jan 12 21:50:10 2005 UTC revision 1.58, Wed Jan 12 21:54:52 2005 UTC
# Line 119  Line 119 
119    
120  my $request = $cgi->param("request") || "";  my $request = $cgi->param("request") || "";
121    
122    my $compute_ok = eval {
123    
124    
125  if    ($request eq "use_protein_tool")       { &use_protein_tool($fig_or_sprout,$cgi,$html,$prot); }  if    ($request eq "use_protein_tool")       { &use_protein_tool($fig_or_sprout,$cgi,$html,$prot); }
126  elsif ($request eq "view_annotations")       { &view_annotations($fig_or_sprout,$cgi,$html,$prot); }  elsif ($request eq "view_annotations")       { &view_annotations($fig_or_sprout,$cgi,$html,$prot); }
127  elsif ($request eq "view_all_annotations")   { &view_all_annotations($fig_or_sprout,$cgi,$html,$prot); }  elsif ($request eq "view_all_annotations")   { &view_all_annotations($fig_or_sprout,$cgi,$html,$prot); }
# Line 133  Line 136 
136  {  {
137      $html = &show_html_followed_by_initial($fig_or_sprout,$cgi,$html,$prot);      $html = &show_html_followed_by_initial($fig_or_sprout,$cgi,$html,$prot);
138  }  }
139    };
140    
141    if (!$compute_ok)
142    {
143        print "Content-type: text/html\n";
144        print "\n";
145    
146        print "Error encountered during page computation:\n";
147        print "<pre>\n$@\n</pre>\n";
148        exit;
149    
150    }
151  &display_page($fig_or_sprout,$cgi,$html);  &display_page($fig_or_sprout,$cgi,$html);
152  exit;  exit;
153    

Legend:
Removed from v.1.57  
changed lines
  Added in v.1.58

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3