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

Diff of /FigWebServices/homologs_in_clusters.cgi

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

revision 1.4, Thu Jun 23 21:24:49 2005 UTC revision 1.5, Mon Jun 27 18:26:35 2005 UTC
# Line 81  Line 81 
81  }  }
82    
83  &compute_desired_homologs($fig_or_sprout,$cgi,$html,$prot);  &compute_desired_homologs($fig_or_sprout,$cgi,$html,$prot);
84    
85    if ($is_sprout)
86    {
87        my $h = { homologs => $html };
88    
89        print "Content-Type: text/html\n";
90        print "\n";
91        my $templ = "$FIG_Config::fig/CGI/Html/Homologs_tmpl.html";
92        print PageBuilder::Build("<$templ", $h,"Html");
93    }
94    else
95    {
96  &HTML::show_page($cgi,$html);  &HTML::show_page($cgi,$html);
97    }
98  exit;  exit;
99    
100  sub compute_desired_homologs {  sub compute_desired_homologs {

Legend:
Removed from v.1.4  
changed lines
  Added in v.1.5

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3