- Timestamp:
- 2013-06-10T10:25:10+12:00 (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
gs2-extensions/parallel-building/trunk/src/bin/script/test_fileutils.pl
r27515 r27585 465 465 if ($base_path ne '') 466 466 { 467 my $depth = split(/[\/\\]/, $base_path) - 1; 467 my @parts = split(/[\/\\]/, $base_path); 468 my $depth = scalar(@parts) - 1; 468 469 my $rel_prefix = '..'; 469 470 for (my $i = 1; $i < $depth; $i++)
Note:
See TracChangeset
for help on using the changeset viewer.