just another bug fix (or two)

2005-11-09 16:48:21 +00:00
parent 38178ea9fa
commit c4d120082b
7 changed files with 7 additions and 5 deletions
--- a/editor/studio/UnitMainTools.pas
+++ b/editor/studio/UnitMainTools.pas
@ -1093,8 +1093,8 @@ begin
  if Count = 0 then
    Add('', '');

-  if (AIndex < Count) then
-    Activate(AIndex, True, False)
+  if (AIndex -1 < Count) and (AIndex <> 0) then
+    Activate(AIndex -1, True, False)
  else
    Activate(0, True, False);
 end;