[Bio] / FigKernelPackages / PinnedRegions.pm Repository:
ViewVC logotype

Diff of /FigKernelPackages/PinnedRegions.pm

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

revision 1.18, Mon Mar 9 17:01:25 2009 UTC revision 1.19, Wed Mar 25 18:00:13 2009 UTC
# Line 573  Line 573 
573          }          }
574      }      }
575      unless ($extended) {      unless ($extended) {
576          @subsystems = grep { $fig->usable_subsystem($_->[0],1) } @subsystems;          @subsystems = grep { $fig->usable_subsystem($_->[0]) } @subsystems;
577          @subsystems = grep { $fig->is_exchangable_subsystem($_->[0]) } @subsystems;          @subsystems = grep { $fig->is_exchangable_subsystem($_->[0]) } @subsystems;
578      }      }
579    
# Line 584  Line 584 
584    
585          if ( $variant eq '0' ) {          if ( $variant eq '0' ) {
586              # no subsystem              # no subsystem
587                if ($extended) {
588                    my $ss_text = "$ss_name (not yet classified for this organism)";
589                    $peg_to_ss{$fid}{$ss_text} = 1;
590                }
591          } elsif ( $variant eq '-1' or $variant eq '*-1' ) {          } elsif ( $variant eq '-1' or $variant eq '*-1' ) {
592              # subsystem not functional in this organism              # subsystem not functional in this organism
593              my $ss_text = "$ss_name (classified 'not active' in this organism)";              my $ss_text = "$ss_name (classified 'not active' in this organism)";

Legend:
Removed from v.1.18  
changed lines
  Added in v.1.19

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3