Просмотр исходного кода

* improved KDE detection

git-svn-id: trunk@22324 -
michael 13 лет назад
Родитель
Сommit
cecc6b778c
1 измененных файлов с 1 добавлено и 1 удалено
  1. 1 1
      packages/fcl-process/src/unix/process.inc

+ 1 - 1
packages/fcl-process/src/unix/process.inc

@@ -136,7 +136,7 @@ begin
     if (XTermProgram='') then
       begin
       D:=LowerCase(GetEnvironmentVariable('DESKTOP_SESSION'));
-      If (D='kde') then
+      If (Pos('kde',D)<>0) then
         begin
         TestTerminal('konsole');
         end