From 3ef297a7cd4d44e86da1f1959c362b704d81a5b6 Mon Sep 17 00:00:00 2001
From: Dmitry Maksyoma <ledestin@gmail.com>
Date: Fri, 13 Aug 2021 00:07:59 +1200
Subject: [PATCH] vncserver: refactor

---
 unix/vncserver | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/unix/vncserver b/unix/vncserver
index 5b85289..1ab0da7 100755
--- a/unix/vncserver
+++ b/unix/vncserver
@@ -932,7 +932,7 @@ sub StartXvncWithSafeFontPath {
 }
 
 sub IsXvncRunning {
-   kill 0, `cat $pidFile`;
+    &IsProcessRunning(`cat $pidFile`);
 }
 
 sub WarnUserXvncNotStartedAndExit {
@@ -1085,6 +1085,7 @@ sub WaitForTimeLimitOrSubReturningTrue {
 
 sub IsProcessRunning {
    my $pid = shift;
+   unless ($pid) { return 0 };
 
    kill 0, $pid;
 }