Revision 541272c5
Von Moritz Bunkus vor etwa 18 Jahren hinzugefügt
| SL/InstallationCheck.pm | ||
|---|---|---|
| 11 | 11 |
{ "name" => "HTML::Template", "url" => "http://search.cpan.org/~samtregar/" },
|
| 12 | 12 |
{ "name" => "Archive::Zip", "url" => "http://search.cpan.org/~adamk/" },
|
| 13 | 13 |
{ "name" => "Text::Iconv", "url" => "http://search.cpan.org/~mpiotr/" },
|
| 14 |
{ "name" => "Klaus", "url" => "http://dum.my/" },
|
|
| 15 | 14 |
); |
| 16 | 15 |
|
| 17 | 16 |
sub module_available {
|
| ... | ... | |
| 27 | 26 |
sub test_all_modules {
|
| 28 | 27 |
my @missing_modules; |
| 29 | 28 |
|
| 30 |
map({ push(@missing_modules, $_) unless (module_available($_)); }
|
|
| 29 |
map({ push(@missing_modules, $_) unless (module_available($_->{"name"})); }
|
|
| 31 | 30 |
@required_modules); |
| 32 | 31 |
|
| 33 | 32 |
return @missing_modules; |
Auch abrufbar als: Unified diff
Beim Login wird jetzt ein Check durchgeführt, ob alle benötigten Perl-Module installiert sind. Wenn nicht, dann wird eine Fehlermeldung sowie eine Liste der fehlenden Module ausgegeben sowie grobe Informationen, wie man die fehlenden Module nachinstallieren kann.