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

Diff of /FigKernelPackages/FIG.pm

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

revision 1.611, Mon Aug 27 18:27:33 2007 UTC revision 1.612, Tue Aug 28 18:46:40 2007 UTC
# Line 15203  Line 15203 
15203    
15204      if ($cache)      if ($cache)
15205      {      {
15206          warn "Reading from cache\n";          #warn "Reading from cache\n";
15207          while (<$cache>)          while (<$cache>)
15208          {          {
15209              chomp;              chomp;
# Line 15213  Line 15213 
15213      }      }
15214      else      else
15215      {      {
15216          warn "reading from dir\n";          #warn "reading from dir\n";
15217          if (opendir(SUB,"$FIG_Config::data/Subsystems"))          if (opendir(SUB,"$FIG_Config::data/Subsystems"))
15218          {          {
15219              push(@subsystems, grep { ($_ !~ /^\./) and $self->usable_subsystem($_) } readdir(SUB));              push(@subsystems, grep { ($_ !~ /^\./) and $self->usable_subsystem($_) } readdir(SUB));
Legend:
Removed from v.1.611  
changed lines
  Added in v.1.612
MCS Webmaster
 ViewVC Help
Powered by ViewVC 1.0.3