This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Update to Term::ANSIColor 1.03, from Russ Allbery.
[perl5.git] / lib / find.pl
index 29b83b0..ee5dc5d 100644 (file)
 
 use File::Find ();
 
-*name = *File::Find::name;
-*prune = *File::Find::prune;
-*dir = *File::Find::dir;
+*name          = *File::Find::name;
+*prune         = *File::Find::prune;
+*dir           = *File::Find::dir;
+*topdir                = *File::Find::topdir;
+*topdev                = *File::Find::topdev;
+*topino                = *File::Find::topino;
+*topmode       = *File::Find::topmode;
+*topnlink      = *File::Find::topnlink;
 
 sub find {
     &File::Find::find(\&wanted, @_);