diff options
Diffstat (limited to 't/29-app-dthumb-data.t')
-rwxr-xr-x | t/29-app-dthumb-data.t | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/t/29-app-dthumb-data.t b/t/29-app-dthumb-data.t index 3790006..faa8874 100755 --- a/t/29-app-dthumb-data.t +++ b/t/29-app-dthumb-data.t @@ -5,11 +5,12 @@ use 5.010; use autodie; use App::Dthumb::Data; +use File::Slurp qw(read_dir); use Test::More; -opendir(my $share, 'share'); -my @files = grep { /^[^.]/ } readdir($share); -closedir($share); +my @files = grep { ! -d "share/$_" } read_dir('share'); +push(@files, map { "lightbox/$_" } read_dir('share/lightbox')); +push(@files, map { "shadowbox/$_" } read_dir('share/shadowbox')); my @files_archived = sort grep { ! /\.dthumb$/ } @files; |