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

Diff of /FigWebServices/subsys.cgi

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

revision 1.178, Fri Oct 13 19:33:54 2006 UTC revision 1.179, Mon Oct 30 23:29:38 2006 UTC
# Line 2766  Line 2766 
2766          my($cluster);          my($cluster);
2767          foreach $cluster (@clusters)          foreach $cluster (@clusters)
2768          {          {
2769                # RAE only color pegs if we have > 1 functional role involved in the cluster
2770                my %countfunctions=map{(scalar $fig->function_of($_)=>1)} @$cluster;
2771                next unless (scalar(keys %countfunctions) > 1);
2772    
2773              $color = shift @colors;              $color = shift @colors;
2774              foreach $peg (@$cluster)              foreach $peg (@$cluster)
2775              {              {

Legend:
Removed from v.1.178  
changed lines
  Added in v.1.179

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3