Magic-Mirror/gecko-dev
1
0
Fork 0
mirror of https://github.com/mozilla/gecko-dev.git synced 2025-01-27 07:34:20 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

Patch for bug 258579: t/Support/Files.pm should use File::Find; patch by Marc Schumann <wurblzap@gmail.com>, r=vladd, a=justdave.

Browse Source
This commit is contained in:
jocuri%softhome.net 2004-12-06 17:03:00 +00:00
parent bb7f62fe74
commit d2754c0733
1 changed files with 4 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
webtools/bugzilla/t/Support/Files.pm
View File

@ -23,6 +23,8 @@
package Support::Files;
use File::Find;
# exclude_deps is a hash of arrays listing the files to be excluded
# if a module is not available
#
@ -33,11 +35,8 @@ package Support::Files;
);
# XXX - this file should really be rewritten to use File::Find or similar
$file = '*';
@files = (glob($file), glob('Bugzilla/*.pm'), glob('Bugzilla/*/*.pm'),
glob('Bugzilla/*/*/*.pm'), glob('Bugzilla/*/*/*/*.pm'),
glob('Bugzilla/*/*/*/*/*.pm'));
@files = glob('*');
find(sub { push(@files, $File::Find::name) if $_ =~ /\.pm$/;}, 'Bugzilla');
sub have_pkg {
my ($pkg) = @_;