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

Diff of /FigKernelPackages/NRTools.pm

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

revision 1.2, Wed Sep 5 21:01:22 2007 UTC revision 1.3, Thu Sep 13 19:53:08 2007 UTC
# Line 112  Line 112 
112    
113      my $dh = new DirHandle($dir);      my $dh = new DirHandle($dir);
114    
115        if (!$dh)
116        {
117            warn "Cannot open directory $dir: $!";
118            return;
119        }
120    
121      while (defined($_ = $dh->read()))      while (defined($_ = $dh->read()))
122      {      {
123          next unless /^\d+$/;          next unless /^\d+$/;

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

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3