[Bio] / FigKernelScripts / compute_ev_code_attributes.pl Repository:
ViewVC logotype

Diff of /FigKernelScripts/compute_ev_code_attributes.pl

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

revision 1.1, Mon Oct 15 19:13:49 2007 UTC revision 1.2, Sat May 3 02:30:30 2008 UTC
# Line 31  Line 31 
31  open(OUT, ">$subsys_file") || die "Can't write to $subsys_file: $!";  open(OUT, ">$subsys_file") || die "Can't write to $subsys_file: $!";
32  foreach my $ss ($fig->all_subsystems)  foreach my $ss ($fig->all_subsystems)
33  {  {
34      next unless ($fig->usable_subsystem($ss));      next unless ($fig->usable_subsystem($ss,1));  # do not use cluster-based subsystems for evidence codes
35      print OUT "$ss\n";      print OUT "$ss\n";
36  }  }
37  close OUT;  close OUT;

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

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3