From 3a20fbbff45089bbcf0fad8dfa0653d15192cb99 Mon Sep 17 00:00:00 2001 From: Alexey-t Date: Thu, 4 Jul 2019 15:12:57 +0300 Subject: [PATCH] fix prev patch --- econtrol/ec_lexerlist.pas | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/econtrol/ec_lexerlist.pas b/econtrol/ec_lexerlist.pas index 0f05e5f..9a9fd2c 100644 --- a/econtrol/ec_lexerlist.pas +++ b/econtrol/ec_lexerlist.pas @@ -188,11 +188,11 @@ function TecLexerList.FindLexerByFilename(AFilename: string; end; if Names.Count=0 then exit; + Names.Sort; if (Names.Count=1) or not Assigned(AChooseFunc) then exit(TecSyntAnalyzer(Names.Objects[0])); - Names.Sort; i:= AChooseFunc(AFilename, Names); if i>=0 then exit(TecSyntAnalyzer(Names.Objects[i]));