From bf105af56c2a0a3cf14e58c69e6ca2e716818fe4 Mon Sep 17 00:00:00 2001
From: Martin <laz.git@mfriebe.de>
Date: Sat, 27 Aug 2022 20:09:16 +0200
Subject: [PATCH] Debugger: fix crash in GetUniqueName

---
 debugger/frames/debugger_class_options.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/debugger/frames/debugger_class_options.pas b/debugger/frames/debugger_class_options.pas
index 194e59f122..1abfa73c0b 100644
--- a/debugger/frames/debugger_class_options.pas
+++ b/debugger/frames/debugger_class_options.pas
@@ -529,7 +529,7 @@ begin
   repeat
     inc(i);
     j := FCopiedDbgPropertiesConfigList.IndexOf(Result+' ('+IntToStr(i)+')');
-    if (j >= 0) and (FCopiedDbgPropertiesConfigList.Opt[i]= FSelectedDbgPropertiesConfig)
+    if (j >= 0) and (FCopiedDbgPropertiesConfigList.Opt[j]= FSelectedDbgPropertiesConfig)
     then
       j := -1;
   until j < 0;