diff --git a/src/ce_gdb.pas b/src/ce_gdb.pas
index 9a1b0c29..5473a42c 100644
--- a/src/ce_gdb.pas
+++ b/src/ce_gdb.pas
@@ -2055,7 +2055,7 @@ begin
       with lstVariables.Items[lstVariables.Items.Count-1] do
         SubItems.Add(val.AsString);
     end;
-    if (j <> -1) and (j <= lstVariables.Items.Count) then
+    if (j <> -1) and (j < lstVariables.Items.Count) then
       lstVariables.ItemIndex := j;
     lstVariables.EndUpdate;
   end;