X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FInstallationCheck.pm;h=e82298ea889f243b72e46032f483ed6ae6399c85;hb=9198a41442e997dc37eb80d3a30eab7136d58208;hp=22724c429eee614a058f663e94195f5c33cd75b2;hpb=541272c5cf4f874a13eff89993d5d4a941451f42;p=kivitendo-erp.git diff --git a/SL/InstallationCheck.pm b/SL/InstallationCheck.pm index 22724c429..e82298ea8 100644 --- a/SL/InstallationCheck.pm +++ b/SL/InstallationCheck.pm @@ -8,9 +8,14 @@ use vars qw(@required_modules); { "name" => "CGI::Ajax", "url" => "http://search.cpan.org/~bct/" }, { "name" => "DBI", "url" => "http://search.cpan.org/~timb/" }, { "name" => "DBD::Pg", "url" => "http://search.cpan.org/~dbdpg/" }, - { "name" => "HTML::Template", "url" => "http://search.cpan.org/~samtregar/" }, { "name" => "Archive::Zip", "url" => "http://search.cpan.org/~adamk/" }, { "name" => "Text::Iconv", "url" => "http://search.cpan.org/~mpiotr/" }, + { "name" => "Time::HiRes", "url" => "http://search.cpan.org/~jhi/" }, + { "name" => "YAML", "url" => "http://search.cpan.org/~ingy/" }, + { "name" => "IO::Wrap", "url" => "http://search.cpan.org/~dskoll/" }, + { "name" => "Text::CSV_XS", "url" => "http://search.cpan.org/~hmbrand/" }, + { "name" => "List::Util", "url" => "http://search.cpan.org/~gbarr/" }, + { "name" => "Template", "url" => "http://search.cpan.org/~abw/" }, ); sub module_available { @@ -24,12 +29,7 @@ sub module_available { } sub test_all_modules { - my @missing_modules; - - map({ push(@missing_modules, $_) unless (module_available($_->{"name"})); } - @required_modules); - - return @missing_modules; + return grep { !module_available($_->{name}) } @required_modules; } 1;