vncserver: refactor
This commit is contained in:
@@ -28,7 +28,7 @@
|
|||||||
use v5.10;
|
use v5.10;
|
||||||
use Time::HiRes qw (sleep);
|
use Time::HiRes qw (sleep);
|
||||||
|
|
||||||
&DetectEnvironment();
|
&EnsureWeCanRunInThisEnvironment();
|
||||||
|
|
||||||
&DefineFilePathsAndStuff();
|
&DefineFilePathsAndStuff();
|
||||||
|
|
||||||
@@ -967,10 +967,9 @@ sub PrintKasmUsers {
|
|||||||
warn "\n";
|
warn "\n";
|
||||||
}
|
}
|
||||||
|
|
||||||
sub DetectEnvironment {
|
sub EnsureWeCanRunInThisEnvironment {
|
||||||
$exedir = &DetectBinariesDir();
|
$exedir = &DetectBinariesDir();
|
||||||
&CheckRequiredDependenciesArePresent();
|
&CheckRequiredDependenciesArePresent();
|
||||||
&DetectFontPath();
|
|
||||||
}
|
}
|
||||||
|
|
||||||
sub DefineFilePathsAndStuff {
|
sub DefineFilePathsAndStuff {
|
||||||
@@ -1005,6 +1004,8 @@ sub DefineFilePathsAndStuff {
|
|||||||
"# alwaysshared\n");
|
"# alwaysshared\n");
|
||||||
|
|
||||||
chop($host = `uname -n`);
|
chop($host = `uname -n`);
|
||||||
|
|
||||||
|
&DetectFontPath();
|
||||||
}
|
}
|
||||||
|
|
||||||
sub ParseAndProcessCliOptions {
|
sub ParseAndProcessCliOptions {
|
||||||
|
|||||||
Reference in New Issue
Block a user