diff options
| author | Russ Allbery <rra@stanford.edu> | 1999-08-18 21:35:44 -0700 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1999-09-20 03:45:06 +0000 |
| commit | 17b275ff7f254c13ec0fa07c81e929826b830a85 (patch) | |
| tree | dd9390fec45d17510d5323dda0c44c6620694004 /lib | |
| parent | c7a610ab136c73561800bf7cdeff586005d8a79a (diff) | |
| download | perl-17b275ff7f254c13ec0fa07c81e929826b830a85.tar.gz | |
[ID 19990819.002] File::Find error when pruning top-level directories
Message-Id: <yl7lms9f5b.fsf@windlord.stanford.edu>
p4raw-id: //depot/perl@4200
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/File/Find.pm | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lib/File/Find.pm b/lib/File/Find.pm index 284bf678ac..28e2e90e44 100644 --- a/lib/File/Find.pm +++ b/lib/File/Find.pm @@ -130,6 +130,8 @@ sub find_opt { warn "Can't cd to $dir: $!\n"; } } + } + continue { chdir $cwd; } } |