[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.1, Sun Oct 17 16:40:13 2004 UTC revision 1.2, Wed Oct 27 01:22:01 2004 UTC
# Line 82  Line 82 
82      my $sc;      my $sc;
83      my @tab = map { ($peg,$sc) = @$_; [$sc,      my @tab = map { ($peg,$sc) = @$_; [$sc,
84                                         &HTML::fid_link($cgi,$peg),                                         &HTML::fid_link($cgi,$peg),
85                                           $fig->genus_species($fig->genome_of($peg)),
86                                         scalar $fig->function_of($peg,$cgi->param('user')),                                         scalar $fig->function_of($peg,$cgi->param('user')),
87                                         &HTML::set_prot_links($cgi,join( ', ', $fig->feature_aliases($peg) ))                                         &HTML::set_prot_links($cgi,join( ', ', $fig->feature_aliases($peg) ))
88                                        ] } @homologs;                                        ] } @homologs;
89      push(@$html,&HTML::make_table(["Crude Score","PEG","Function","Aliases"],\@tab,"PEGs that Might Be in Clusters"));      push(@$html,&HTML::make_table(["Crude Score","PEG","Genome", "Function","Aliases"],\@tab,"PEGs that Might Be in Clusters"));
90  }  }
91    
92  sub relevant_homologs {  sub relevant_homologs {

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

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3