mirrors/doublecmd
2
0
Fork 0
mirror of https://github.com/doublecmd/doublecmd.git synced 2026-06-21 09:58:13 +00:00
Code Issues Projects Releases Packages Wiki Activity

FIX: Lazarus 4.99 compatibility

Browse source
This commit is contained in:
Alexander Koblov 2026-01-25 00:50:51 +03:00
commit fcf07a7ebb
1 changed files with 4 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

5
components/synunihighlighter/source/SynUniHighlighter.pas
View file

@ -138,7 +138,7 @@ type
implementation
uses
CRC, Laz2_XMLRead;
CRC, Laz2_XMLRead, LCLVersion;
//==== TSynUniSyn ============================================================
constructor TSynUniSyn.Create(AOwner: TComponent);
@ -703,6 +703,9 @@ begin
ReadXMLFile(Xml, TargetStream, [xrfPreserveWhiteSpace]);
try
LoadFromXml(Xml);
{$if lcl_fullversion >= 4990000}
DefaultFilter:= GetDefaultFilter;
{$endif}
finally
Xml.Free;
end;