Und die dazugehoerigen Templates
[kivitendo-erp.git] / SL / InstallationCheck.pm
index 84ee43d..e82298e 100644 (file)
@@ -8,10 +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 {
@@ -25,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;