projects
/
kivitendo-erp.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
bei oe suche wurde der Mitarbeiter nicht im callback mitgefuehrt
[kivitendo-erp.git]
/
SL
/
InstallationCheck.pm
diff --git
a/SL/InstallationCheck.pm
b/SL/InstallationCheck.pm
index
84ee43d
..
3977bb4
100644
(file)
--- a/
SL/InstallationCheck.pm
+++ b/
SL/InstallationCheck.pm
@@
-12,6
+12,9
@@
use vars qw(@required_modules);
{ "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" => "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/IO-stringy-2.110/" },
+ { "name" => "Text::CSV_XS", "url" => "http://search.cpan.org/~hmbrand/Text-CSV_XS-0.29/" },
);
sub module_available {
);
sub module_available {
@@
-25,12
+28,7
@@
sub module_available {
}
sub test_all_modules {
}
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;
}
1;