From 9a7c99dd002301dbb8243a247d32ab8f41b67d36 Mon Sep 17 00:00:00 2001
From: juha <juha@lazarus-ide.org>
Date: Sat, 3 Oct 2020 00:07:14 +0000
Subject: [PATCH] IDE: Fix handling of new registered command line parser.
 Issue #37855, patch from errno.

git-svn-id: trunk@63946 -
---
 ide/frames/compiler_compilation_options.pas | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/ide/frames/compiler_compilation_options.pas b/ide/frames/compiler_compilation_options.pas
index 426c50f732..781181614b 100644
--- a/ide/frames/compiler_compilation_options.pas
+++ b/ide/frames/compiler_compilation_options.pas
@@ -230,10 +230,10 @@ begin
       if Cmb.Checked[i] then begin
         j:=ExternalToolList.ParserCount-1;
         while (j>=0)
-        and (Cmb.Items[i]<>ExternalToolList.Parsers[i].GetLocalizedParserName) do
+        and (Cmb.Items[i]<>ExternalToolList.Parsers[j].GetLocalizedParserName) do
           dec(j);
         if j>=0 then
-          sl.Add(ExternalToolList.Parsers[i].GetParserName)
+          sl.Add(ExternalToolList.Parsers[j].GetParserName)
         else
           sl.Add(Cmb.Items[i]); // not registered parser
       end;