Changes in / [675cc03:623516c]


Ignore:
File:
1 edited

Legend:

Unmodified
Added
Removed
  • client/bin/gbr

    r43ddb7a r267d44e  
    5959    # if it is a file (and not a directory)
    6060    sub append {
    61         my $name = $File::Find::name;
    62         if (-f $name) {
    63             push(@allfiles, $name);
     61        if (-f $_) {
     62            push(@allfiles, $_);
    6463        }
    6564    }
    6665   
    67     # recursively find all the files and add them to @allfiles
    68     find(\&append, @files);
     66    # recursively find all the files and add them to @allfiles     
     67    find({ wanted => \&append, no_chdir => 1}, @files);
    6968
    7069    # if we're not shuffling the list, then sort the files.  If we are
Note: See TracChangeset for help on using the changeset viewer.