Преглед на файлове

* 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