|
|
@ -127,7 +127,7 @@ unless (&IsXvncRunning()) {
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
warn "\nNew '$desktopName' desktop is $host:$displayNumber\n";
|
|
|
|
warn "\nNew '$desktopName' desktop is $host:$displayNumber\n";
|
|
|
|
warn "\nUsername: $vncUserName\n\n";
|
|
|
|
&PrintKasmUsers();
|
|
|
|
warn "Log file is $desktopLog\n\n";
|
|
|
|
warn "Log file is $desktopLog\n\n";
|
|
|
|
|
|
|
|
|
|
|
|
if (! $skipxstartup) {
|
|
|
|
if (! $skipxstartup) {
|
|
|
@ -1028,3 +1028,11 @@ sub CreateUserConfigIfNeeded {
|
|
|
|
close(VNCUSERCONFIG);
|
|
|
|
close(VNCUSERCONFIG);
|
|
|
|
chmod 0644, "$vncUserDir/config";
|
|
|
|
chmod 0644, "$vncUserDir/config";
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
sub PrintKasmUsers {
|
|
|
|
|
|
|
|
warn "\nUsers configured:\n";
|
|
|
|
|
|
|
|
foreach my $user (@kasmPasswdUsers) {
|
|
|
|
|
|
|
|
warn "$user\n";
|
|
|
|
|
|
|
|
}
|
|
|
|
|
|
|
|
warn "\n";
|
|
|
|
|
|
|
|
}
|
|
|
|