Changeset 78


Ignore:
Timestamp:
11/30/05 11:45:45 (19 years ago)
Author:
thauvin
Message:
  • skip non regular file
File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/soft/ObsData/ObsData/Repository.pm

    • Property cvs2svn:cvs-rev changed from 1.19 to 1.20
    r75 r78  
    7575            } 
    7676 
     77            if (!-f "$self->{dir}/$file") { 
     78                next; # Not regular file, link are follow (stat) 
     79            } 
     80 
    7781            if ($file eq 'obsdata.ini') { 
    7882                next; # skipping status file 
    7983            } 
    80              
     84 
    8185            my $archive = ObsData::Repository::archive->new( 
    8286                $self, 
Note: See TracChangeset for help on using the changeset viewer.