paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-09 23:08:05 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE: Sort a category list in "All options" parser. Issue #29907.

Browse Source 
git-svn-id: trunk@52066 -
This commit is contained in:
juha 2016-03-26 20:52:12 +00:00
parent e466450bbc
commit e9527743c5
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
ide/compiler.pp
View File

@ -926,6 +926,7 @@ begin
fDefines := TStringList.Create;
fInvalidOptions := TStringList.Create;
fSupportedCategories := TStringList.Create;
fSupportedCategories.Sorted := True;
fGeneratedOptions := TStringList.Create;
fRootOptGroup := TCompilerOptGroup.Create(Self, Nil);
end;
@ -1050,7 +1051,6 @@ begin
else if AnsiStartsStr(Supported, Line) then
Category := AddNewCategory(Copy(Line, Length(Supported)+1, Length(Line)));
end;
fSupportedCategories.Sorted := True;
finally
sl.Free;
end;