X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/1d91e75c53e7da5bf2c1b334f5aeecf241dc5ec4..ed41d55e5545edd2abb6a2cae868bc6ebc45771d:/t/Support/Files.pm?ds=inline diff --git a/t/Support/Files.pm b/t/Support/Files.pm index e485561a3..f325a0ae8 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$/;}, 'bin/mozilla'); sub have_pkg { my ($pkg) = @_;