X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/1d91e75c53e7da5bf2c1b334f5aeecf241dc5ec4..fbfac89685b9baf3e87fb32c194f191c3d24115c:/t/Support/Files.pm diff --git a/t/Support/Files.pm b/t/Support/Files.pm index e485561a3..d05f365e3 100644 --- a/t/Support/Files.pm +++ b/t/Support/Files.pm @@ -39,6 +39,7 @@ use File::Find; @files = glob('*'); find(sub { push(@files, $File::Find::name) if $_ =~ /\.pm$/;}, 'SL'); +find(sub { push(@files, $File::Find::name) if $_ =~ /\.pl$/;}, qw(bin/mozilla sql/Pg-upgrade2)); sub have_pkg { my ($pkg) = @_;