Revision 911031a3
Von Sven Schöling vor etwa 9 Jahren hinzugefügt
| t/Support/Files.pm | ||
|---|---|---|
| 40 | 40 |
@files = glob('*');
|
| 41 | 41 |
find(sub { push(@files, $File::Find::name) if $_ =~ /\.pm$/;}, 'SL');
|
| 42 | 42 |
find(sub { push(@files, $File::Find::name) if $_ =~ /\.pl$/;}, qw(bin/mozilla sql/Pg-upgrade2));
|
| 43 |
find(sub { push(@files, $File::Find::name) if $_ =~ /\.html$/;}, qw(templates/webpages));
|
|
| 43 | 44 |
|
| 44 | 45 |
sub have_pkg {
|
| 45 | 46 |
my ($pkg) = @_; |
Auch abrufbar als: Unified diff
tests: html Vorlagen auch in Testdateien aufnehmen