Changeset 267d44e for client/bin/gbr


Ignore:
Timestamp:
Oct 10, 2010, 12:35:43 PM (14 years ago)
Author:
Jessica B. Hamrick <jhamrick@…>
Branches:
master, debian, mac, no-cups
Children:
2876403, 02483ba, 618236b, 30e33fb
Parents:
1c3f290
git-author:
Jessica B. Hamrick <jhamrick@…> (10/10/10 12:35:43)
git-committer:
Jessica B. Hamrick <jhamrick@…> (10/10/10 12:35:43)
Message:

Fix bug with recursive option in gbr

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.