Small improvements reading the display server value in Linux

Added TCefLinuxDisplayServer.ldsTTY

Author: salvadordf

source/uCEFApplicationCore.pas

@@ -2533,19 +2533,36 @@ procedure TCefApplicationCore.AfterConstruction;
 procedure TCefApplicationCore.ReadDisplayServer;
 {$IFDEF FPC}
 var
-  TempSession : AnsiString;
+  TempSession, TempDisplay : AnsiString;
 {$ENDIF}
 begin
   {$IFDEF FPC}
-  TempSession := GetEnvironmentVariable('XDG_SESSION_TYPE');
+  TempSession := lowercase(GetEnvironmentVariable('XDG_SESSION_TYPE'));
 
   if (TempSession = 'wayland') then
     FDisplayServer := ldsWayland
    else
     if (TempSession = 'x11') then
       FDisplayServer := ldsX11
      else
-      FDisplayServer := ldsUnknown;
+      if (TempSession = 'tty') then
+        FDisplayServer := ldsTTY
+       else
+        begin
+          TempDisplay := lowercase(GetEnvironmentVariable('WAYLAND_DISPLAY'));
+
+          if (length(TempDisplay) > 0) then
+            FDisplayServer := ldsWayland
+           else
+            begin
+              TempDisplay := lowercase(GetEnvironmentVariable('DISPLAY'));
+
+              if (length(TempDisplay) > 0) then
+                FDisplayServer := ldsX11
+               else
+                FDisplayServer := ldsUnknown;
+            end;
+        end;
   {$ENDIF}
   // TO-DO : Find a way to get read the value of an environment variable or the display server type in FMXLinux.
 end;

source/uCEFTypes.pas

@@ -1488,7 +1488,7 @@   TChromiumVersionInfo = record
   /// <summary>
   /// Linux session type. Used to check whether the display server is Xorg or Wayland.
   /// </summary>
-  TCefLinuxDisplayServer = (ldsX11, ldsWayland, ldsUnknown);
+  TCefLinuxDisplayServer = (ldsX11, ldsWayland, ldsTTY, ldsUnknown);
 
   /// <summary>
   /// Used by TCEFFileDialogInfo.

update_CEF4Delphi.json

@@ -2,7 +2,7 @@
   "UpdateLazPackages" : [
     {
       "ForceNotify" : true,
-      "InternalVersion" : 814,
+      "InternalVersion" : 815,
       "Name" : "cef4delphi_lazarus.lpk",
       "Version" : "141.0.11"
     }