mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-12 16:49:44 +02:00
SynEdit: Set only unique value in TSynHighlighterMultiScheme.SetVirtualLines. Issue #23548, patch from Giulio Bernardi
git-svn-id: trunk@39666 -
This commit is contained in:
parent
88e6c9630c
commit
f535dce823
@ -1937,7 +1937,6 @@ end;
|
|||||||
|
|
||||||
procedure TSynHighlighterMultiScheme.SetVirtualLines(const AValue: TSynHLightMultiVirtualLines);
|
procedure TSynHighlighterMultiScheme.SetVirtualLines(const AValue: TSynHLightMultiVirtualLines);
|
||||||
begin
|
begin
|
||||||
if FVirtualLines = AValue then exit;
|
|
||||||
FVirtualLines := AValue;
|
FVirtualLines := AValue;
|
||||||
if FHighlighter <> nil then
|
if FHighlighter <> nil then
|
||||||
FHighlighter.CurrentLines := AValue;
|
FHighlighter.CurrentLines := AValue;
|
||||||
|
Loading…
Reference in New Issue
Block a user