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

synedit: restore occasionally removed gutter invalidates in r19001 #a26d1805de

Browse Source 
git-svn-id: trunk@19046 -
This commit is contained in:
paul 2009-03-20 17:25:13 +00:00
parent 6dfc88f10b
commit e8814a27e8
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/synedit/synedit.pp
View File

@ -5077,11 +5077,13 @@ end;
procedure TCustomSynEdit.SetDebugMarks(AFirst, ALast: Integer); procedure TCustomSynEdit.SetDebugMarks(AFirst, ALast: Integer);
begin begin
TSynEditStringList(fLines).SetDebugMarks(AFirst, ALast); TSynEditStringList(fLines).SetDebugMarks(AFirst, ALast);
InvalidateGutterLines(AFirst, ALast);
end; end;
procedure TCustomSynEdit.ClearDebugMarks; procedure TCustomSynEdit.ClearDebugMarks;
begin begin
TSynEditStringList(fLines).ClearDebugMarks; TSynEditStringList(fLines).ClearDebugMarks;
InvalidateGutter;
end; end;
{$IFDEF SYN_LAZARUS} {$IFDEF SYN_LAZARUS}