This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
In pods_to_install(), use $File::Find::prune to skip t/ directories.
authorNicholas Clark <nick@ccl4.org>
Thu, 22 Dec 2011 11:07:33 +0000 (12:07 +0100)
committerNicholas Clark <nick@ccl4.org>
Sat, 24 Dec 2011 08:30:09 +0000 (09:30 +0100)
commit65e5b0167e9699a603db53d07657ab54bfacfa34
tree8e7d70ce392dd7831428654af8ab2d57ad34132d
parent9bbb230a203c96fa7e8a45ef46e37c00319fafb1
In pods_to_install(), use $File::Find::prune to skip t/ directories.

We don't want to install anything within a t/ directory. Previously the code
was determining this based on pattern matching the path. Instead of rejecting
what we find, it's more efficient to avoid scanning the directory tree in the
first place.
Porting/pod_lib.pl