Revision fcedeaa9
Von Jan Büren vor etwa 1 Jahr hinzugefügt
scripts/installation_check.pl | ||
---|---|---|
|
||
use strict;
|
||
use Getopt::Long;
|
||
use List::MoreUtils qw(uniq);
|
||
use Pod::Usage;
|
||
use Term::ANSIColor;
|
||
use Text::Wrap;
|
||
|
||
my $exit = 0;
|
||
my $exit_code = 0;
|
||
unless (eval { require Config::Std; 1 }){
|
||
print STDERR <<EOL ;
|
||
+------------------------------------------------------------------------------+
|
||
... | ... | |
+------------------------------------------------------------------------------+
|
||
EOL
|
||
|
||
$exit = 1;
|
||
$exit_code = 72;
|
||
}
|
||
|
||
|
||
... | ... | |
+------------------------------------------------------------------------------+
|
||
EOL
|
||
|
||
$exit = 1;
|
||
$exit_code = 72;
|
||
}
|
||
|
||
exit 72 if $exit;
|
||
exit $exit_code if $exit_code;
|
||
|
||
use SL::InstallationCheck;
|
||
use SL::LxOfficeConf;
|
Auch abrufbar als: Unified diff
inst-check korrigiert