X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/kivitendo-erp.git/blobdiff_plain/f6e5b55ae22f3fda6863e8a14e07bc8ca6664564..a1070c2d94abd46d8bba45c2a57609e59f2582a9:/SL/InstallationCheck.pm diff --git a/SL/InstallationCheck.pm b/SL/InstallationCheck.pm index 5f44cd2d4..e82298ea8 100644 --- a/SL/InstallationCheck.pm +++ b/SL/InstallationCheck.pm @@ -8,11 +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 { @@ -26,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;