From 4b24220de9108831371a1f6bc7bdca9b923eafe2 Mon Sep 17 00:00:00 2001
From: marco <marco@freepascal.org>
Date: Sun, 15 Jan 2012 12:09:59 +0000
Subject: [PATCH]  * increase loop in determine xterm, Mantis #21028

git-svn-id: trunk@20085 -
---
 packages/fcl-process/src/unix/process.inc | 1 +
 1 file changed, 1 insertion(+)

diff --git a/packages/fcl-process/src/unix/process.inc b/packages/fcl-process/src/unix/process.inc
index 7e433dc9fa..29e5a04fe1 100644
--- a/packages/fcl-process/src/unix/process.inc
+++ b/packages/fcl-process/src/unix/process.inc
@@ -109,6 +109,7 @@ Function DetectXterm : String;
       Result:=TestTerminal(Terminals[i]);
       If Result then
         XTermProgram:=Terminals[i];
+       inc(i);
       end;
   end;