mirrors/doublecmd
2
0
Fork 0
mirror of https://github.com/doublecmd/doublecmd.git synced 2026-06-21 09:58:13 +00:00
Code Issues Projects Releases Packages Wiki Activity

FIX: Qt5 version - execute under wayland session

Browse source
This commit is contained in:
Alexander Koblov 2018-08-04 09:41:07 +00:00
commit 0a756bb17e
1 changed files with 5 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

5
src/platform/unix/uqt5workaround.pas
View file

@ -11,12 +11,17 @@ uses
procedure _exit(status: cint); cdecl; external clib;
function atexit(func: pointer): cint; cdecl; external clib;
function setenv(const name, value: pchar; overwrite: cint): cint; cdecl; external clib;
procedure DoExit; cdecl;
begin
_exit(ExitCode);
end;
initialization
if (LowerCase(fpGetEnv(PAnsiChar('XDG_SESSION_TYPE'))) = 'wayland') then
setenv('QT_QPA_PLATFORM', 'xcb', 1);
finalization
// Workaround: https://doublecmd.sourceforge.io/mantisbt/view.php?id=2079
if (UpCase(fpGetEnv(PAnsiChar('XDG_CURRENT_DESKTOP'))) = 'KDE') then