Преглед изворни кода

* improved KDE detection

git-svn-id: trunk@22324 -
michael пре 13 година
родитељ
комит
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