Changeset 27967
- Timestamp:
- 2013-08-02T22:29:17+12:00 (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
other-projects/nightly-tasks/diffcol/trunk/diffcol/diffutil.pm
r27604 r27967 16 16 17 17 opendir(DIR, $dirname) || die "can't opendir $dirname: $!"; 18 @local_files = grep { /^\w/ && (-d &util::filename_cat($dirname,$_)|| -f &util::filename_cat($dirname,$_))} readdir(DIR); 18 my $skipdirs_re = qr/^cached$/; 19 @local_files = grep { /^\w/ && ((-d &util::filename_cat($dirname,$_) && $_ !~ m/$skipdirs_re/) || -f &util::filename_cat($dirname,$_))} readdir(DIR); 19 20 closedir DIR; 20 21
Note:
See TracChangeset
for help on using the changeset viewer.